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GENERAL OVERVIEW 


Course TITLE: CYBER CP COMPASS 
Course NumBer:  DA3020 
Course LencTH: 5 Days 


DESCRIPTION: 


THIS COURSE INTRODUCES THE STUDENT TO THE COMPASS ASSEMBLY 
LANGUAGE INCLUDING DATA FORMATS, MACRO INSTRUCTIONS AND SUB- 
ROUTINE PROGRAMMING AND LINKAGE ROUTINES, 


PREREQUISITES: 


~ DA2000 or FA2000, CYBER 70/179 INTRODUCTIONS OR PREVIOUS COM- 


PUTER EXPERIENCE, 
Course OBJECTIVES: 


UPON COMPLETION, THE STUDENT WILL BE EXPECTED TO WRITE AND 
DEBUG A COMPASS COMPUTATIONAL ROUTINE UTILIZING THE CP INSTRUC- 
TION SET, DATA FORMATS, PSEUDO INSTRUCTIONS, PROGRAMMER MACROS 


AND INCORPORATING THE PASSING OF PARAMETERS AND LINKING OF 
SUBROUTINES, 
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CYBER CP COMPASS — 
COURSE OUTLINE 
I. INTRODUCTION 
II, CENTRAL PROCESSOR OVERVIEW 
JoB FLOW IN SYSTEM 
ConTROL PoINT 
REGISTERS 


ARITHMETIC UNIT - FUNCTIONAL & UNIFIED 
INSTRUCTION CYCLE 


Mornwo YD 


ITI]. JOB OVERVIEW 


A. CODING CONVENTIONS 
B, INSTRUCTION FORMAT 
C, JoB sTRUCTURE 

D. Control STATEMENTS 


IV, INSTRUCTIONS 


INTEGER ARITHMETIC 
SETS 

JUMPS 

BOOLEAN 

SHIFTS 
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V. FLOATING POINT ARITHMETIC 
DATA ForMAT 


A, 
B. CONVERSION 
C. INSTRUCTIONS 
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VI, 


VII, 


VIII. 


XI, 


COURSE OUTLINE (Cont. ) 


DATA ITEMS 


A, DATA 
B, CON 
C, DIS 
D, LITERAL 
E, VFD 


PSEUDO OPERATIONS 
A, EQU/SET 

B. REP 

Ci “LOC 

ERROR EXITS 


A, Special Forms 
B. Exit Mopes 


MACROS 


OPDEF ‘s 
PSEUDO OPS 
Micros 
MACROS 
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CONDITIONAL ASSEMBLY 
Ae. TFC 

IFPP 
C, IF - TEST SYMBOL 
SUBROUTINES 
PARAMETER PASSING 
ComPASS ROUTINES 
FORTRAN INTERFACE 
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LESSON 1 
INTRODUCTION 


Lesson Review; 


THE OBJECTIVES AND FORMAT OF THE CLASS ARE DISCUSSED. 
STUDENTS ARE GIVEN A BRIEF PRETEST TO CHECK THEIR BACKGROUND- 


REFERENCES: 
None 
TRAINING Alps: 


NONE” 


PRoveEcts: 


PRETEST IN STUDENT HANDOUT 
OBVYECT Ss: 


AT THE COMPLETION OF THIS UNIT THE STUDENT WILL BE ABLE TO: 
1. List THE OBJECTIVES oF THIS COURSE 


2. STATE WHAT SKILLS HE/SHE EXPECTS FROM THIS COURSE> 


1-1 


THE 


LESSON 2 


CENTRAL PROCESSOR OVERVIEW 
Lesson PREVIEW: 
THE COMPONENTS OF THE CENTRAL PROCESSOR AND HOW AN IN- 


STRUCTION IS EXECUTED IS DISCUSSED, IN ADDITION A JOB 
IN EXECUTION IS TRACED THROUGH ITS FLOW IN THE SYSTEM, 


REFERENCES: 


CHAPTER 1 COMPASS Rer. Man, #60492600 
CHAPTER 2 CYBER 170 Harpware ReF. #60420000 


TRAINING Arps: 


VisuaL set V2 


NONE 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL ‘BE 
ABLE TO: 


1. DESCRIBE THE FIVE PHASES OF A JOB IN THE SYSTEM, 

2. EXPLAIN THE CONTROL POINT, ; 

3, LIST THE COMPONENTS AND THEIR FUNCTIONS OF THE 
CENTRAL PROCESSOR, 

4, EXPLAIN HOW AN INSTRUCTION IS OPERATED ON BY 
THE COMPONENTS OF THE CENTRAL PROCESSOR, 
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MODEL 171 SYSTEM 


The mode! 171 basic computer system (figure 1-9) 

has a serial CP-0 with a serial CP-! option. Each 

CP contains large and small arithmetic sections, in- 

struction control, and a compare/move unit. The 

CPs communicate with each PPS and ECS, if in- 

rea through CM. CM is under eontro! of the 
MC. 


If the optional ECS is installed, it provides addi- 
tional memory capabilities. short access times, 
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and fast transfer rates to and from CM. 


The PPS-0 performs all I/O operations and uses 
an instruction set separate from that of the CP to 
execute independent programs in each of 10 PFs. 
The PPs have individual memories and communi- 
cate with each other and any of 12 1/O channels. 
The PPs may be expanded from 10 to 14, 17. or 20 
by adding PPS-1. This option expands the number 
of 1/O channels from 12 to 24. 
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Figure 1-9, 
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MODEL 172 SYSTEM 


The model 172 basic computer system {figure 1-10) 
is functionally similar to model 171, excep! that the 
CP provides faster operation. The model 172 also 
has a second CP option. Basic equipment in model 
i172 includes a compare/move unit in the CP and 
two DCCs in PPS-0. This equipment is available 
only as options in model 171. 


2 HFN RM dea jee or ag 


LARGE SMALL COMPARE/ Ey 
ARITHMETIC ARITHMETIC | MOVE 
SECTION SECTION UNIT x 


INSTRUCTION CONTROL 


a es 
EcSs i 
COUPLER Bh 
0) 


ecs 


CONTROLLER 1 
4 
© I 
1 
EXTENDED CORE STORLSE = . 
4 SUBSYSTEM DISTRIBST.VE ES : 
I DATS PATH é 1 
t 1 
ONE 1/0 
CHANNEL SERIPHERL; 
PROCESSOR = Ee. 
Se rion SUBSYSTEM-O fay 


Lookls Cnt Be twosse 


Twl - in ; 
| COnvER"ERS CmBNNELS 
{FOR 3505+ Ty HE 
© Equeuent) © 
| MINE TO CHANNELS 


WOTES 
@ OP1ONaAL EOUIPWENT. 


Original and later model 172 systems have some 
differences that result from development of addi- 
tional equipment. Figure 1-10 represents the later 
model-172 system. The original model 172 basic 
memory has 32,768 words and requires tuo incre- 
ments to reach the 65,536 words of the basic 
™memory of later model 172 systems. 
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Figure 1-10. Model 172 Computer System 


MODEL 173 SYSTEM CP provides faster operation. 


The model 173 basic computer system (figure 1-11) 
is functionally similar to model 172, except that the 
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Figure 1-11, Model 173 Computer System 


Seaize 


4 


MODEL 174 SYSTEM 


system provides faster operation. Model 174 dif- 


The mode! 174 basic computer system (figure 1-12) 
is functionally similar to model 173, except that the -Bame as for model 173. 
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Figure 1-12. Model 174 Computer Svstem 
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MODEL 175 SYSTEM tral processing unit (CPU), and the CMC. The nine 


functional units operate in parallel as independent 


The model 175 basic computer system (figure 1-13) specialized arithmetic units, providing mazimum 


is functionally similar to model 173 and its options 


overlap of instruction retrieval and execution. The 
except inthe CP. In place of the serial CP, the basic model 175 has two CSUs that provide 16 
mode! 175 CP contains nine functional units, a cen- independent banks of memory. 
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Figure 1-13. Model 175 Computer System 


OAODEL 176 SYSTEM still optionally expandable but does not have separate 
CSUs as in other models. The CM and LCME each 

The model 176 basic computer system, (figure 1-14) contain their own contro] functions. Other major 

is functionally similar to mode) 175 in the areas of differences include the option of adding from 4 to a 

the CP and PPS. Model 176 differs basically from total of 13 PPus, an1/O multiplexer, and a logic 


mode] 175 in the use of an LCME option in the basic @canner to permit PPS communication with the PPUs. 
system instead of having an ECS option. The CM is : 
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Figure 1-14. Mode! 176 Computer System 


Functional Unit in Certral Processor 


Unit 


Boolean 


Shift 


F.P. add 


Fix add 


Multiply 
Divide 
Increment 


Normalize 


Pop Count 


Function 


Basic logical operations of transfer, logical product and sum, 
and logical difference. 


Basic shifting operations. Left circular shifts, right end-off 
sign extension, plus the floating point work of normalization, 


‘pack and unpack. Also provides the mask generator. 


Floating point addition and subtraction 


One's complement addition and subtraction on 60-bit fixed point 
mumbers. 


Floating point mltiplication 

Floating point division 

One's complement addition and subtraction of 18-bit mumbers. 
Places a word in normalized format. 


Count the mmber of one bits in a word. 


CENTRAL PROCESSOR REGISTERS 
A EIGHT 18-BIT ADDRESS REGISTERS © 


PREVIOUS COMPUTERS USED SINGLE-ACCUMULATOR DESIGN, 
In THE 6000 DESIGN THIS WAS INEFFICIENT FOR LENGTH 
OF INSTRUCTION (15 or 30 BIT) AND FETCH TIME... 


SECOND PROBLEM WAS SINGLE-ADDRESS PROCEDURE THAT 
IMPLIES SINGLE ACCUMULATOR, 


AppITIONAL CP REGISTERS SOLVED PROBLEM 
AO - USED FOR COMMUNICATION WITH ECS 


Al - A5 - usep To ‘LDA’ FUNCTION, LOAD ACCUMULATOR 
WITH INFORMATION FROM MEMORY, 


AG, A7 - used to ‘STA’, PUT INFORMATION BACK INTO 
MEMORY 


EIGHT 18-BIT INCREMENT REGISTERS 


ALSO SAME LENGTH AS ADDRESS REGISTERS, CAN BE USED 
FOR ADDRESS, INCREMENTS, COUTINERS, INDEXING, ETC, 


X EIGHT 60-BIT OPERAND REGISTERS 


ALL ARITHMETIC OPERATIONS PERFORMED ON OPERANDS IN 
X-REG, 


-CHorce of 60-BITS FOR INSTRUCTION PACKING AND FLOAT- 
ING POINT PRECISION, 


XO - COMMUNICATION WITH ECS 


Xl - X5 - VALUE OF WORD AT ADDRESS Al THRU A-5 ..., 
CONTENTS 


X6, X7 - STORE CONTENTS OF X REG, IN ADDRESS A6 OR 
A7 
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Att 24 REGISTERS ARE PROGRAMMABLE, 


1, INSTRUCTIONS NEVER ACCESS MEMORY DIRECTLY. INSTEAD, 
CHANGING THE CONTENTS OF AN A-REGISTER CAUSES A MEM- 
ORY REFERENCE FOR THE CORRESPONDING X-REGISTER, 


2. X AND A REGISTERS 1-5 ARE USED TO ACCESS MEMORY... 
PUTTING A 5 IN A2 CAUSES CONTENTS OF MEMORY LOCATION 
5 TO BE PUT INTO X2, 


3, A AND X REGISTERS 6.7 ARE USED TO STORE INTO MEMORY... 
PuT A 3 IN A6 CAUSES THE CONTENTS OF X6 To BE PUT INTO 
LOCATION 3. 


4, BO IS ALWAYS ZERO, 


Lesson 3 


JOB OVERVIEW 
LESSON PREVIEW: 
THIS LESSON INTRODUCES MACHINE LANGUAGE PROGRAMMING, 
- ASSEMBLY LANGUAGE PROGRAMMING, CODING CONVENTIONS, 


INSTRUCTION FORMATS, JOB STRUCTURE AND A FEW BASIC 
MNEMONICS, . 


REFERENCES: 
CHAPTERS 1-3. 10, 11 COMPASS Rer. Man. #60492600 
- Traine Arps: 


Visual set V3 
PROGRAM COMPILATION OF DECK 3A 


PROJECTS: 


PROGRAMMING PRovecT #1 
HOMEWORK 


OBJECTIVES: 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE ABLE 
TO: 


1. WRITE A SIMPLE PROGRAM IN. MACHINE LANGUAGE . 

2. WRITE A SIMPLE PROGRAM IN ASSEMBLY LANGUAGE, 
1.E.- COMPASS, 

3, EXPLAIN THE INTERFACE BETWEEN THE ASSEMBLER 
AND THE LOADER, 

4, FIND RESULTS IN A DUMP, 

5. CONSTRUCT A JOB DECK TO RUN AND EXECUTE A 
COMPASS PROGRAM, | | 

6,. USE ARITHMETIC AND INCREMENT UNIT INSTRUC- 
TIONS CORRECTLY, 
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Instruction Flow 


ARITHMETIC 


INSTRUCTION 
WORD 


“MEMORY 


Instruction Flow 


An instruction word is fetched from memory. The arithmetic unit will interpret the 
instruction word and perform required operstions. Every instruction is an interregister 
instruction, i.2., the operands will be in registers and the results will be written to 
registers. When a memory read operation (an address to be put in Al to AS5) or s memory 
" write operation (an address to be put in A6 or A7) is required, 8 transfer between memory 
end the appropriate X register will take place. Another instruction word is fetched. 


wees 


INSTRUCTION FORMATS 


= 


OP RESULT Ist OPERAND  2np OPERAND 


CODE. REGISTER REGISTER REGISTER 


SEES 


ALL ARITHMETIC INSTRUCTIONS AND SOME INCREMENT UNIT 
INSTRUCTIONS ARE 15 BiTs, FoR EXAMPLE: 


Machine Cope § COMPASS 


36123 —ti(sé«CTX2d?’ X2+X3 
40321 FX3 X2*X1 
66200 ~  SB2 BO+B0 
56120 SAl B2+B0 
- | 
OP RESULT Ist OPERAND  2np OPERAND 
CODE REGISTER REGISTER REGISTER 
eae ee ee 


SOME INCREMENT UNIT INSTRUCTIONS AND ALL BRANCH INSTRUC . 


TIONS ARE 30 BITs, For EXAMPLE: 


6111000001 SB1 BL 

5160001000 SAG BO+1000g 

0412000023 EQ B1,B2,239 
3=3 


INSTRUCTION FORMATS 


15-Bit InstRuCTIONS 


6-BIT - 3-BIT 
OP CODE OPERAND 
3-BIT 
RESULT 


30-BIT INSTRUCTIONS 


6-BIT 3-BIT 
OP CODE OPERAND 
oe ie ee ee ee 
3-BIT 18-BIT OPERAND 


RESULT CONSTANT OR BRANCH ADDRESS 
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15 


30 


30 
3-5 


30 
30 


INSTRUCTION WORD FORMATS 
30 | 


15 
15 
15 


MACHINE LANGUAGE PROGRAMMING 
1, READ FOUR NUMBERS FROM MEMORY, 
2. ADD THE NUMBERS, 


3. STORE THE RESULT IN MEMORY, 


a A a a is 
00000000000000000004 
00000009000000000025 
PETIITAT AL TATED 

105 | 5110000100/5120000101 
51300001035140000103 
36612/36734\36667/46000 
5160000104). 


DIRECTIONS: WRITE A MACHINE LANGUAGE PROGRAM WHICH WILL 


EVALUATE (A&B)/C where A=2,2, B=3,8, C=2.0, ASSUME THAT 
2.2, 3.8 AND 2.0 ARE IN CORE AT LOCATIONS 100, 101, AND 


102. StToRE THE RESULT AT 103, THE PROGRAM STARTS AT 104, 


COMPASS CODING FORM 


In COMPASS THE PROGRAM WILL LOOK LIKE THIS: 


SAl 100 
SA2 101 
SA3 102 
SAY 103 
1X6 X1+X2 
1X7 X3+X4 
IX6 X6+X7 
SA6 . 104 - 


WE STILL HAVE NO WAY TO GET THE DATA INTO MEMORY. THE 


DATA SPEUDO OP WILL DO THAT, 


- LOCAD DATA =23.4,21,<1. 


THE ASSEMBLER WILL ASSIGN AN ADDRESS For LOCAD RELATIVE 
TO THE START OF THE PROGRAM, WE CAN USE THAT INSTEAD OF 
100. Now we HAVE: 


~ LOCAD DATA -23,4,21,-1 
© SAL LOCAD 

SA2 LOCAD+1 
SA3 LOCAD+2 
SAY LOCAD+3 
‘1X6 X1+X2 

1X7 X3+X4 

IX6 X6+X7 

SA6 RESULT 

RESULT BSS 1 


THE BSS SAVED ONE LOCATION FOR THE RESULT, 


IF WE START THE ASSEMBLY WITH IDENT, END IT WITH END, . 
AND ESTABLISH STARTING AND ENDING EXECUTION POINTS, 
WE'LL BE DONE. THE COMPLETE PROGRAM IS SHOWN ON THE 


NEXT PAGE, 
3-7 


CYBER 70/6000/7000 COMPASS CODING FORM 


MAME CP COMPASS 
DATE 
Commtnts 
ma of » | 27] 20) 94] 90] nal 97 [00 [v0 fe os foal of 
SSE TE real Gnewen Te % NRE Re oo 
Og a8 Sy Ay eV, POT bon pe ek ee ee ek 
. Siwnewwravirnnnyresrsweverravravrrrrey 
HUME, atySy Cis" VE EMT OMGAL ys BUT y MOT, NE CES SAM: oo oe eter nee ede nat 
Ee, Rit FE AAEM, City MAY AVAL] FO, COP ELE AT Ee 1S5P cE Cat gf gl gC My T yt OM GS, 0 pp pg pt 


rare aC eaarerel aera coe Oe ae Os WOO 
+ 


} Jr ys Lit heal te Oe OO 
ACS U Lal SPEER ET AeA 
RAE TUR, VO, ,O,F 608 tO, 9,081 Em 
SR ente ee TERT nt, le nar ' 


awdeyd ‘Tenuew ssedweo 


Og Sutpesg 


Trsnpesquy 


a. 


ee 


BEGIN: Cotumn 1 or 2 END: First BLANK or CoLuMN 3 NORMAL: Cotumns 2-9 


CONTENTS: 
1, SYMBOL , 7 
(1-8 cHaRAcTerRs, ExcepT LINKAGE SYMBOL, 7 CHARACTERS, oR 3 FOR PP) 
a 2, A NAME 
(a SYMBOL For a BLOCK, MACRO, MICRO, or Instruction BRACKET) 
3, + * 
(FoRcES UPPER) _ 


i, ~ 
(CANCELS SOME FORCE-UPPERS) 


ase ites 


BEGIN: Cotumn 3-29 END: First BLANK, oR CoLumn 29 JF FoLLowep BY A 
VARIABLE FIELD ENTRY, 


NORMAL: Cotumns 11-16 


CONTENTS: 
. 1, CP OPERATION CODE 
: 2. PP OPERATION CODE 
3, PSEUDO-INSTRUCTION 
4, MACRO Name 


TI=€ 


" = 


(ApprEss F1etp) 


BEGIN: Berore Cotumn 29 END: First BLANK, OR CoLUMN 72 


NORMAL: Cotumn 18-29 


CONTENTS: (Dictate BY THE OPERATION CODE) 
1, REGISTERS, SEPARATED BY OPERATOR + - * / 
IX6 X1+X2 
2, SUBFIELDS, seas BY COMMAS, 


LX1 B2,X6 
EQ B3,B6-ADDRESS 


COMMENTS FIELD 
BEGIN: AFTER VARIABLE Fret END: Cotumn 72 
Cotumn 30 rf VAR FIELD Is EMPTY 


NORMAL: Cotumns 30-72 


CI~E 


CONTENTS: ANY COMBINATION OF. CHARACTERS 


LOCATION OPERATION | VAR TABLE 


IGNORED  JDENT 1,-2, orn 3 SUBFIELDS 


- Must BE 1st OPERATION OF A SUBPROGRAM 

- CAN OCCUR ONLY ONCE PER SUBPROGRAM 

- IF THE ASSEMBLER IS CALLED BY FORTRAN RATHER THAN BY 
A COMPASS conTroL carD, IDENT must APPEAR IN CoL, 
11-15, 

- IsT VARIABLE SUBFIELD --- MUST CONTAIN THE LINKAGE 
SYMBOL WHICH BECOMES THE SUBPROGRAM NAME, 

- For RELOCATABLE ASSEMBLIES --- IGNORE VARIABLE 
SUBFIELDS 2 AND 3, 


_- For ABsoLuTE ASSEMBLIES --- np SUBFIELD DEFINES THE 


FWA OF THE ABSOLUTE BINARY PROGRAM IMAGE. THE 3RD 
SUBFIELD CONTAINS THE ENTRY ADDRESS FOR ABSOLUTE cP 
ASSEMBLIES, 


IGNORED ENTRY LINKAGE SYMBOLS SEPARA- 
TED BY COMMAS 


. LINKAGE SYMBOLS ARE DECLARED TO THE LOADER AS ENTRY 


POINTS. 
= EAacH LINKAGE SYMBOL MUST BE DEFINED IN THE ASEEMBLY 
AS A NON-EXTERNAL SYMBOL. 


SYMBOL OR END BLANK OR LINKAGE SYMBOL 
BLANK | . (TRANSFER ADDRESS) 


~ TERMINATES A SUBPROGRAM DECK 

- CAUSES THE ASSEMBLER TO TERMINATE ANY COUNTER, CON- 
DITIONAL ASSEMBLY, MACRO GENERATION, OR CODE DUPLI- 
CATION IN PROGRESS, . 

- ALL LocAL BLOCKS ARE ASSIGNED IN ORIGIN RELATIVE TO 
THE PROGRAM ORIGIN IN THE ORDER IN WHICH THEY WERE 
INTRODUCED, 

- Tue TRANSFER ADDRESS DEFINES THE STARTING POINT OF 
EXECUTION OF A PROGRAM WHEN IT IS LOADED. 


3-13 


STORAGE ALLOCATION 


SYMBOL BSS ABSOLUTE ADDRESS 
OR EXPRESSION 
BLANK . 


- LOCATION FIELD SYMBOL IS GIVEN THE CURRENT VALUE OF 
THE LOCATION CouNTER, . 

- THE VARIABLE FIELD EXPRESSION IS EVALUATED AND THE 
LOCATION AND ORIGIN COUNTERS ARE INCREMENTED BY 
THAT AMOUNT, | 

- SYMBOLS IN. THE EXPRESSION MUST HAVE PREVIOUSLY BEEN 
DEFINED, 

- IF ADDRESS EXPRESSION IS INCORRECT, NO SPACE WILL 

BE RESERVED, BUT A FORCE UPPER WILL OCCUR, 

BSS 0 FORCES UPPER WITHOUT ALLOCATING STORAGE, 


SYMBOL BSSZ ABSOLUTE ADDRESS 
OR | . EXPRESSION 
BLANK 


- IDENTICAL To BSS except THAT BSSZ RESERVES AN AREA 
OF ZERO FILLED WORDS, 


BLANK DATA ABSOLUTE ADDRESS 
OR . EXPRESSION 
SYMBOL 


- SYMBOL IS GIVEN CURRENT VALUE OF LOCATION COUNTER, 

- DATA ITEMS MAY BE OCTAL, DECIMAL, OR DISPLAY CODE 
CHARACTERS. AND MUST BE FULL-WORD VALUES. 

- SEPARATED BY COMMAS, 

- TERMINATED BY BLANKS, 

- LITERALS MAY NOT BE USED, 

- FORCES UPPER, 


aoo START ASSEMBLY COMPASS 3.5-470, 06/20/70 16.27.$3. PAGE i] 
STORAGE ALLOCATION. . : 
ADDRESS LENGTH BINANY CONTHOL CARDS. 
e 12 : 10ENs Avo START ASSEMBLY 
a2 eno cry!) TERMINATE COMPASS ASSEMBLY 


ENTRY POINTS. 
60 ae 


ERTERNAL SYMBOLS. 


Avo START ASSEMBLY COMPASS 3.5-470, 06/20/70 16.27.$3. PACE 2 
WW 
1 toENt ann START ASSEMALY 
ENIAY GO GO 1S AN ENTRY PONE 
list oF. SHOW DETAIL 
© Merete VIVEVTVVITT TSE LOCADDR DATA -230%e2R0-8 DATA FOR PROGRAN 
2 Seeccnececeennenenns 
2 ¢0000000000000000025 
Dd VrvererveveveyvTvTIVTTE 
& Sapeooeece o 00 oat Locaoor ERECUTION BEGINS Htae 
Si200eeee) $A2 LOCADORe§ A2 @ 2ND DATA WORD 
S$ Sirseceecez « SA) LOCAVDUR*¢2 Ad © IRD DATA wORD 
Srseceoeed « Sas LOCAUDRe} = X84 @ 4H DATA WORD 
@ deen2 1n6 RDeK2 Re © 1ST SUM 
an? KDone AT @ 2ND SUM 
36667 ra6 nOon? R6 @ FINAL RESULT 
- Y Speeeceeta o $a6 RESULT STORE ANSWER 
vieorsre2) ENDRUN TERMINATE PROGRAM ERECUTION 
18 1 RESULT OASSZ] AESERVE WORD OF ZEROS FOR ANSWER 
OCFAULT SYMBOLS DEFINED BY COMPASS. 
en SYSe 
te END 60 TERMINATE COMPASS ASSEMOLY 
473008 SCM STORAGE USED 10 STATEMENTS 4 SYMBOLS 


MODEL ITA ASSEMALY 0.024 SECONDS 1o REFERENCES 


anu Start ASSEMOALY : COMPASS 3.5-4170, Ub720796 16.27.51. PAGE 3 
SVMBOLIC REFERENCE TALE. 
ov "  g ProuRaNe 2702 € eon LL 
cocaoon 0 PROGHAKE 2704 L é70H 2/09 2710 | 27tt 
RESULT i PROUNANE 2718 § CAVTL 
sySe 0 ERTERNWAL® rIARI 
LOAD MAP - 200 a CYMER LOADER §.4-670 06720798 16.27.S%. PAGE ] 
FwAs OF THE (00D toa 
Lwae§ OF THE LOAD $6) 
TRANSFER ADDRESS -- GO 1s 
PROGRAM ENTRY POINTS ~<- ado tls 


9T-€ 


PROGRAM AND BLOCK ASSIGNMENTS, 


BLOCK ADOWESS LENGIN FILE pate PWOCSSA VER LEVEL HAHOWARE COMMENTS 

aoo oan 12 co 06/28/74 CUMPASS 3.5 470 . 

SVS RM 12) 40 St-S¥SL16 05/16/78 CUMPASS 3.5 &70 PROCESS SYSTEM REQUEST. 
.025 CP SECONDS 132008 CH StonAGt USED - § TABLE move 


DUMP ss RELATIVE DMP ol bLol?7. 
oolti T7TTT VreIVT FRITF TWIIWSO ~ 00000 00000 00000 000n4% 00000 00000 00000 00025 
00826 7777 «TITITT TITTI W776 51100 Oollk Sl200 00112 “81300 00113 51400 00114 36612 36734 36667 46000 
00120 $1600 00822 71602 47021 20650 01000 00125 46000 00000 00000 00000 0000! 04000 00136 00000 00000 
00824 01300 00000 vo000 00000 04000 00122 N000U 00000 S1100 00001 031180 on126 54610 04000 00124 46000 
00130 $2100 00066 ¥3310 00132 Silno 00123 04000 00133 7TEL00 COL30 20160 44000 83661 83161 836601 466000 
00834 516000 00124 106011 46000 Stioo ououl oloov 00123 20652 01000 00125 46000 Silico cocol 03110 ond? 
00140 04006 00140 61000 46000 Slloo On00) 03110 00140 71602 20314 04000 00136 20150 36661 01000 00125 
00144 04004 00144 61000 46000 91602 20314 20452 36662 $3160 20173 03310 00144 03080 00144 51100 00001 
00150 O3810 00146 71100 00001 04000 00143 6100¥ 46000 71603 24616 12661 20651 01000 00125 61000 44000 
00154 04004 00154 61000 46000 73660 20630 12161 73610 20123 05210 00152 20151 83116 20636 S1600 00162 
00160 74660 36186 €0123 46000 04000 00152 41000 46000 00000 00000 00000 00000 60000 00000 04004 00163 
COLT? >60000 00000 us00% 00177 
wW 
t 
we 
a] 
MFE NH2- CYH1TS-SNE GLBI/ROH = OS/ES77TR 
16.27.5)..0VONO0FO FROM 4S : 
16.27.5).1P 00000256 WOHDS - FILE INPUT «© OC 04 
16.27651.00N. PSN eO2 1B se TPACTORLACMILLER 
16.27.52,COMPASS, 
16.27 053. ASSEMALY COMPLETE, 473008 SCM USED. 
16.27.53. 0.071 CPU SECONDS ASSFHMNLY TIME. 
16.27 253.60. 
Wheeled NMPot ido IT?. 
16.77254.UF O00N0AI2 WOHDS - FILE OUTPUT » NC 4 
1H 2754 MS 35H4 wORUS ¢ 10752 MAN YSEDD 
16.27.654.CPA ot 3 SEC. oh 3d ANS. 7 
16.27.54.10 oADL SFC. e611 ADS. 
16.27.5%,CM 10.985 nwS, ehtS ANS. 
§6.27.54.5S 1.379 2 
16.2754 PP 2.977 SEC. DATE 00/28/70 


16.27.54.0J 


END OF JORe SH 


Assembler/Pass 1 


ASSEMBLER/LOADER 


THE ASSEMBLY PROCESS 


The input to COMPASS is COMPASS source code as shown on the previous page. COMPASS 
makes two passes through the source to produce its output = a series of tables 
which will be used by the loader. 


Pass 1 = Symbol Table 


On the first pass, the assembler must evaluate all symbolic addresses and table the 
information so that text can be generated on the second pass. For each progran, 
COMPASS uses 0 as a base address. The loader will have to relocate later when 

the actual load address is known. 


LOCATION 
IDENT - ADD COUNTER 
ENTRY _ GO | POSITION 
LOCAD DATA -23,4,21,-1 COUNTER 
GO SAl LOCAD 
SA2 LOCAD+1 | __ SYMBOL ADDRESS TY 


ss Toca | a Ee 

ss toca aaa 
ma aaa ae NRE | 
mS X67 aed 
a ee Ce 


ENDRUN | 
RESULT BSS 4. 
END GO 


Assembler/Pass 1 


Pass 2 - GENERATED TABLES 


ON THE SECOND PASS THROUGH THE SoUuRCE coDE, COMPASS 
WILL GENERATE THE TABLES THAT ARE NEEDED BY THE LOAD- 
ER. THESE TABLES WILL IDENTIFY THE PROGRAM (PREFIX, 
PIDL). INDICATE HOW THE CORE IMAGE SHOULD BE GENERA- 
TED (TEXT), AND SUGGEST THE FIRST INSTRUCTION WORD 

TO BE EXECUTED (XFER), 


SYMBOL ~ ADDRESS TY 


GO 000004 E/R 

LOCAD 000000 R 

RESULT 000011 
IDENT ADD PREFIX/PIDL 
ENTRY G0 ENTR 


LOCAD DATA -23,4,21,-1 TEXT 


SA1 LOCAD TEXT 
SA2 LOCAD+1 TEXT 
SA3 LOCAD+2 TEXT 
SA4 LOCAD+3 TEXT 


IX6 X1+X2 TEXT 
IX7 X3+X4 TEXT 
IX6 X6+X7 TEXT 
SA6 RESULT TEXT 
ENDRUN TEXT 
BSS i ASKiP> 


END G0 XFER 


COMPASS/LOADER INTERACTION 


Deck STRUCTURE 
JOBADD, T10, 
COMPASS, 
LGO, 
7 

8 

9 IDENT ADD 

END 60 

6 

7 

8 

9 
Jos Flow 


RA+0 
RA+l11B 


= 

7 XXX 
| : | RA+EL-1 
o ‘ LOADER }/ 


COMPASS PREPARES ALL ADDRESSES AS IF THE 
JOB WOULD RUN AT RA+0, THE BINARY TABLES 
TELL THE LOADER WHICH ADDRESSES MUST BE 
FURTHER RELOCATED, IN THE EXAMPLE, 111 
IS ADDED TO EACH ADDRESS BECAUSE 111 Is 
THE LOAD ADDRESS FOR THIS LOAD, 


: . 
CHECK THE LOAD MAP AND DUMP ON PAGE 3-16, - NoTICE THAT 
THE LOAD ADDRESS OF ADD 1s 111B AND THAT THE RELOCAT- 


ABLE ADDRESSES WERE MODIFIED BY THE LOADER IN PREPARA-. 
TION FOR EXECUTION, 


. 3-20 


tanor COMPASS 3.5-470, 06727778 06.58.49, PAGE 1 
STORAGE ALLOCATION, 
AODRESS LENGTH BINAHY CONTHOL CAROS. 
0 al TOENT ERROH 
al END staat TRANSFER ADDRESS 
. ALOCKS = TYPE AVORESS LENGTH 
, PROGRAM® LOCAL 0 35 : 
; LETERALS® Loca. 35 r ' 


 FNIRV POINTS, 
START fe our Te 


EXTERNAL SYMBOLS. 


SURI SYS 


Lert 


creor COMPASS 3.5-470,. 067277786 00.58.49. PAGE 2 
toenr = FAROA 
ENTRY STaRt Aur 
€at Supt 
List < 
e 
® WHetS 9S AN EXAMPLE OF AN ERROR LESTING 
e 
© 48000 Stary NO 
? FLAG Fou ? 
: §1010000034 « Sal TEMP 
? 6426) SN2 AA2 
a 7860000810 ° Sx6 dL) OATA 
316000000? San qur STORE IT 
3$ CIVERAL Ltt 20406 CITERAL 
2 $220000036 © ; Sa) LITEWAL of GET A LITERAL (2ND CITERALD 
verat Bx? xi MOVE IT OVER 
3 Srveoooese « ; sat AUF oe} svone iv 
Sproecoott SA.FLAG BUF 2 
& 8100000000 Rk RJ suAl Go to suAl 
iF NEF oF LAGOS 
S Streencese « Sal eto 
ENDRUN 
1160247028 SAG JRENN*4 0} ENORUN of 
6 20650 Lx6 400 ENORUN 63 
eheeooonne RJ OXSYSe ENDRUN of 
END ENORUN of 
ey ? 12 nur ess? 10 BUFFER IN PROGRAN 
i 20 e8e00n0e~oo x Qs sunt SHOW LINKAGE 
1) 22 «48000 . nO 
N eheecocoos x As sual 
e JUNK HEE 
23) S860800034 « SA6 eSTEMP BSS AT END OF PROORANM 
? 20673 Ln4 2?tyA NONFATAL ERROR (NUMRFRD 
0 24 @000000000 126 1600 FATAL ERROR ILETTER) 
| 2s 5 a4 85S 5 “Be ILLEGAL SVHROL 
v 32 Sitesoeeee Sal UNDEF UNDEFINED SYHAOL 
33 GCo0dd000NDeENNNSCE | (co. CONTROL CARD OUT OF PLACE SECTION 4.8.1 REF. MAN. 


DEFAULT SYMBOLS DEFINED AY COMPASS. 


@n $YSe 
34 Tene 


CONTENT OF LITERALS BLOCK. 


3S Genesecegononnodoee? 8 
36 00000000000000000004 n 
JF 00000000000000000004 
40 00000000000000000444 ag 
4) np start TRANSFER ADDRESS 


fe SYMAOLS 
22 REFERENCES 


3a STATEMENTS 


&1I00N SCH STORAGE USED 
0.045 SECONDS 


MODEL 174 ASSEMALY 
2 FRRORS IN FRPOR 


2 ERROR COMPASS 325-470. 06/27/7786 08.58.49. PAGE 3 
i FAROR DIRECTOAY, 


0 TYPE ERROR OPERATION FIELD BaD, 
; OCCURRED ON PAGES 2 
: u TyPE ERROR : UNDEFINED SYMBOL. VALUE ASSUMED 0. 
OCCURRED ON PAGES 2 
) Type ERROR LOCATION SYMBOL BAD. SYMBOL NOT DEFINED. 
OCCUHRED ON PAGES 2 
? TYPE ERROR - ADDRESS VALUE EXCEEDS FIELO SIZE» RESULT TRUNCATED 
OCCURRED ON PAGES 2 


ECHe 


PC-E 


PROGRAM® 
PRAGRAKe 


PROGRaNe 
PeoGRane 
PROGRAME 
EuTERNALS 
ERTEQnaLe 
PROGRAME 


faroR 

. SYMBOLIC REFERENCE TARLE. 
Pur ? 
¥: B44 rb} 
FLAG y 
Lco, 33 
re Waials 3$ 
_ Start 0 
Sunt \] 
= SyYSs 0 
ah TEMP 74 

vu UNDEF 


27n2 
2795 
2709 
2797 
274 
2702 
2703 
2725 
2710 
2736 


zaAPrroes 


2/00 § 277s 


27a 2720 F 
270s 

270A L 

e7i9 272A 

2/392 $ 


COMPASS 3.5-470, 


27ia $ 


2730 


27ate 


04727778 08.66.49. 


PAGE 


4 


, 


t 
‘ 


(0ap HAP - CYAHER LOADER t.4-470 06/27/78 08,564.49. PAGE | 


rwa OF THE (OAD oot 
uwact OF THE LOAD ant 


TRANSFER ADDRESS -- ADDRESS UNSPECIFIED 


PROGRAM ENTRY POINTS -~- : ; 0 


eencoces® FARROR SUMMARY 


reozeoeesattEMPt TO LOAD SUPPRESSED BINARY 
WO PROGRAMS READ VET 
Last FILE aCCESSEO- LGO 
ERRORS IN ASSEMBLY 


08 CP SECONDS 132008 CH STORAGE USED 1 TABLE MOVE 


Se-t 


P 000776 20 000350 RO G00n00 

Pa 128200 af C0000) Ad anoool Ctatee o102 260t vag 0000 anon CtAlys Of02 26nf 0000 @€000 6000 

FL 030000 «82 «(O8d029 AZ TITPPO CHAZ)=s 4000 OfHO 0002 0000 Ob Cin?) 

€4 100700 A3d OOn27F AD HOH?IS Claws HNO COM O000 0000 An0n CtHdie 2300 0000 0006 6000 9000 

PE 00006) 4% 900300 Ae 06N67 CtAsd=s ANDO OfoN 0800 00n0 ao0n CtAebe 7300 000 0000 0000 4000 

FE 000000 45 041033 RS fOT0TN CtsSbe $100 offn Huot Cnne a016 CtASds S110 C046 $9154 FIO 322) 

Ma 000400 a6 C00nnd Ph 005831 Cts6p2 O4902 2601 O10 1000 0000 CtAéd=s 2600 0000 0000 0000 0000 
a? O13N21 AP 002660 CtATH= £000 vO0n Ov02 0000 Ott CIRTde §000 0290 0026 4000 2441 


xno ov7re 77? otter) 6FFOO §6800N 
x} 0000 0000 0000 0000 0000 
n2 0000 0000 0000 0000 6000 
RY 0000 0070 0000 0000 0000 
7 Re 0000 0000 0000 0000 0000 
: mS very vere vere opery Para 
R6 O802 240) 0000 0600 6000 
BF 4000 0000 0007 6000 ot}! 


@0000 00000 00000 00000 00000 OL022 40800 00000 00600 . 00006 60008 00000 00000 
00054 #56110 034510 00054 56120 63380 61410 89424 28422 03140 00057 02300 00000 23443 03040 Ge060 67405 
21422 61447 TPITA 03040 00056 07040 00060 51600 oo000t 04000 00063 00000 00028 


00060 So1Se 63380 13415 
00064 16250 31405 £5230 00000 00000 00000 90010 06067 40000 00000 02000 024406 00000 00000 40000 00000 
“ e007r0 14071 75755 00000 00000 90000 00000 70000 00000 
a 00100 #513000 00000 01000 C0014 
“4 : 00634 226110 43700 $1700 00740 Saito P3780 S4rth 76160 03260 00697 TTIO1 46006 64240 Sa77i e2220 eceee 
00640 $360 Fo2l? TFITIS S*TlO : 04000 O2707 00000 00000 5e3th Va7al 46000 37473 03340 00640 54331 73230 
00644 03040 00647 JP4T2 46000 03140 00640 55311 521! 73730 37472 03140 006480 besée Sour? vrrrs ya2te 
00650 20173 03310 00654 46000 01010 00641 0910900 00752 §2120 00002 30644 $4311 04000 00642 61000 46000 
7 00654 T1700 00014 O1000 0054) 04000 00652 61000 46000 04000 00663 61000 460080 - 04008 80657 61000 46006 
tw 00660 $1400 00657 04700 00457 62120 00008 S312) 66767? 63510 46000 61000 46000 50130 00002 54233 63410 
ro) 00664 63321 05350 00665 63}10 56160 04380 00677 66661 $0611 53620 46000 76230 05670 00664 61000 46000 
00670 73720 75231 O1000 01360 20173 54720 03210 00676 . 54330 77643 63230 22316 TITS2 21674 13467 37643 
o0674 03360 00676 TIT00 00014 01000 00543 61000 46000 64240 02220 00000 46000 SSI92 73620 20173 $4620 
00700 03310 00703 93010 00703 01000 00746 61000 46000 65265 02220 00000 46000 75238 O1000 O1160 46000 
oorTos TITOO COOLS @1000 00543 65241 02220 90000 46000 ; 04000 00712 61000 46000 04000 02670 00000 90000 
oorie $1400 00707 $2120 00004 53322 434600 635130 46000 50130 00002 54231 63410 632" 05350 00714 63330 
oorns $6160 04340 00677 22603 66661 15784 53620 76230 O3FTO OOFTLF 04000 00670 @4000 01742 00000 00000 
eore2o 71600 JLGR7T $3600 00554 66218 43052 71200 00115 01000 00752 61000 46000 51120 00342 15210 221208 
ooT24 03020 00730 F600 00003 12616 7i200 00815 46000 01000 00525 61000 46000 TA7V0F 77603 01000 00543 
00730 67228 06200 GOr2} 46000 04000 00737 B1000 46000 04000 00744 00000 00000 01300 00000 00000 00000 
00734 04000 03745 00000 00000 51100 00008 03120 00735 54610 0400@ 00733 46000 $1200 OCOFIZ 10611 46000 
00740 $2800 00066 03290 00742 T1600 00130 270660 46000 51600 00733 51100 00008 20618 ©2000 COTI2 46000 
0074s 20652 @1n00 00734 46000 Sttoo oo008 o3810 0074S © 04000 00573 00000 00000 Siioe C0008 03110 00746 
00750 78602 203184 04000 00744 20150 34661 01000 00734 04000 00723 00000 00000 31602 20324 20652 36662 
@0754 $3160 20173 03330 00752 03010 00752 S100 a000! 03210 DOTSS 74130 46000 04000 00751 61000 46000 
00760 20223 ThEOd 24684 12662 20651 01000 00734 46000 04000 03648 00000 00000 43266 15262 20222 12212 
ooTns 03260 00760 23221 76610 20650 12226 73610 20636 51600 OO7TO 74160 A22le 04000 00760 61000 46000 
ooTT0 00000 036%6 00000 00001 04004 OoTFI 41000 46000 20136 20684 12616 46000 58600 Oo777 ThHO2 06501 
oorr 20150 74460 12616 46000 : 01000 00734 41000 46000 04000 OOFFI 61000 46000 00000 0n000 00000 00000 
01000 00000 60000 61000 46000 71306 £24665 63452 15336 731600 01012 P2220 ON002 20350 20222 12663 20196 
01004 12662 20728 $3749 20252 20736 02000 n07)% 46000 76310 £01323 01000 01364 Saprvo 21936 37417 10233 
of0l0 03060 O1000 43101 6000 04000 081000 a1n00 46000 00000 00000 00000 00000 04000 07227 00000 00000 
Oto%s 04000 0101) 6I0nn 46000 000N0 00000 41000 46000 10300 74400 20022 46000 51000 01025 61009 46000 
oto20 Ofhio 00090 04090 0102) Seno 10093 53040 46000 04000 030385 62000 46000 S3N08 FE200 02406 46000 
oboes otoon 01715 61000 46000 00000 00000 90000 00000 00000 00000 61000 46000 20300 74400 51600 01025 
&3209 71200 02410 446000 


Otota £0022 54nh0 61000 46090 01210 Onn00 04000 010143 10033 53040 04000 01026 
ObONs 01000 O8715 G50ND 44000 


BREE EHHHeEEBEEFnmBteeeeauEwe:n 


a MFF = 6NA2- CYBETIS-SNI 4LB?7/R68 05715778 
; 08.56.47.00N005G FROK “SH 
08.56.47.1P 00000386 wORDS - FILE INPUT +» OC 04 


06.56.47.N0N. PSOe0Z27He P2CTOLTASMILLER 
08.58.48. COMPASS, 

08.57.49, 3 WARNING MESSAGES IN ERROR 
00.56.49, 2 ERRORS IN ERROR 

06.58.49, ASSEMBLY ERRORS, 473008 SCM USED. 
06.58.49, 0.091 CPU SECONDS ASSEMBLY TIME. 
©6.56.49.060. 

06.56.49, FATAL LOADER Error = SEE MAP 
08.S58.SO.ERITV. 


08.58.50.0P 00001600 WORDS - FILE OUTPUT » DC 40 
06.58.50 .MS 3564 wORDS ¢ 72168 MAR USED) 


906.$6.50.CPA 0128 S&C, 0326 ADJ, 
00.58.50.10 062¢ SEC. e624 ADJ. 
08.56.50.CM 10.499 KwS, 2646 ADU. 
06.50.50.8S 1.393 

08.58.50.PP 2.718 SEC. DATE 06/27/76 


06.58.50.€)5 END OF JOBs SH 


Lene 


EEEEEEE 


XXAXXXX 


SUBPROGRAM STRUCTURE 


MAIN 
EEEEEEE 
XXXXXXX 


AXXAAKXK 


EEEEEEE 


SUB 
XXXXXAX 


A) 


ARAXAAR 


Main Program 


ROUTINE 15 NAMED MAIN 

ENTRY POINT 

XXXXXXX IS AN EXTERNAL SYMBOL 

ENTRY POINT OF MAIN ROUTINEs CONTAINS 
THE FIRST INSTRUCTION 


JUMP TO A SUBROUTINE 


STOP EXECUTION 
EEEEEEE 1S A TRANSFER ADDRESS 


Subroutine 


ROUTINE IS NAMED SUB 
DECLARES XXKXYAR AS Bt: EIR? PCINT 
DUMMY wORD MODIFIED BY RY INSTRUCTION 


JUMP TO ENTRY POINT TO LEAVE SUB 
NO TRANSFER ADDRESS 


a 
a ) 


LESSON 4 
INSTRUCTIONS 
Lesson Preview: 


THIS LESSON INTRODUCES EACH GROUP OF INSTRUCTIONS, 
EXCEPT FLOATING POINT, AND DISCUSSES EACH IN DETAIL, 


REFERENCES: 


CHAPTER 8 COMPASS Rer. #60492600 


TRAINING Arps: 


VISUAL set V4 
PROGRAM COMPILATION LISTINGS OF DECK 5A 


PROJECTS: 


PROGRAMMING PRovECcT #2 
HOMEWORK 


OBJECTIVES: 
AT THE END OF THIS LESSON THE STUDENT WILL BE ABLE TO: 
1, List THE COMPASS INSTRUCTIONS GROUPS, FUNCTIONS 
AND THE ARITHMETIC UNIT THAT EXECUTES THEM, 


2. EXPLAIN INTEGER ARITHMETIC ON THE CYBER 70/170, 
3, MANIPULATE DATA IN WORDS USING BOOLEAN LOGIC, 


SET INSTRUCTION 


INCREMENT UNIT 

SET A RecisteR To A REGISTER + OPERAND (50) 
B REGISTER + OPERAND (51) 
X REGISTER + OPERAND (52) 


_ X ReGisteR +B Reoister (53) 
A RecgisteR +B Recrster (54-55) 
B RecisteR +B Recister (56-57) 


SET B REGISTER TO 


A REGISTER 
B REGISTER 
X REGISTER 


+ OPERAND 
+ OPERAND 
+ OPERAND 


(60) 
(61) 
(62) 


X Register +B Recister (63) 
A RecisteR +B Recister (64-65) 
B REGISTER +B Recister (66-67) 


SET X REGISTER TO A REGISTER + OPERAND (70) 
-—-BReeisteR + Operann = (71) 
X REGISTER + OPERAND (72) 


X REgisTeR +B Recister (73) 
A RecisteR +B Recister (74-75) 
B REGISTER +B Recister (76-77) 


: . 


SET INSTRUCTIONS 


* Use THE TWO INCREMENT UNITS 


* Have an 18-Bit ADDER 


ALLOWABLE OPERATIONS 


Hat 7 
SET A A A CONSTANT USED ‘AS’ AN 
B>tTo B)P+tK OPERAND OR 


Xx X| - A TAG INSTEAD OF A SECOND 
7 SOURCE REGISTER 


a con 


X +B CoMBINATION OF 2 SOURCE 
AW +B REGISTERS 
B ; 


OVERFLOW IS IGNORED IN THE INCREMENT UNIT, 


ANY OPERANDS COMING FROM X REGISTERS ARE TRUNCATED 
TO 18-BITS BEFORE GOING INTO THE UNIT, 


OPERATIONS X +X, A+A, X-B, on X +A ARE ILLEGAL, 


LOAONR COMPASS 3.5-470, 06727778 16.17.43. PAGE } 
STORAGE ALLOCATION. 


ADDRESS LENGTIN BINARY CONTROL CARDS. 
6 6 tOENT LOANNR 
6 ; END LOADNR TRANSFER ADDRESS 


ENTRY POINTS, 
LOADNR ne 


EXTERNAL SYHAOLS. 


SYSa 
LOADNR COMPASS 3-5-4670, O6/27/77A 16.17.4636 PAGE 
IDENT LOADNR 
ENTRY +t OADNR 
ib e 
! e LOAD A NUMBER FROM CENTRAL MEMORY 
sa ® INTO A X REGISTER = 
e TRANSFER THE NUMAER TO AN APPROPRIATE REGISTER 
e STORE THE NUMBER INTO CENTRAL MEMORY 
; e 
0 5230000003 LOADNR SA] nat LOAD THE NUMBER 
1o6al : OX4 xi TRANSFER THE NUMBER 
1 5160000005 .- Sat DATe2 STORE NUMBER 
7160247021 ENDRUN TERMINATE JOB NORMALLY 
3 00000000000001234567 pat DATA 12345678 = NUMBER 
4 2 8ssz 2 PLACE TO STORE NUMBER 
6 ENN LOAONR TRANSFER ADORESS 
473008 SCH STORAGE. USED le STATEMENTS 3 SYMBOLS 
MODEL 174 ASSEMBLY 0.02) SECONDS 6 REFERENCES 
LOAONR COMPASS 305-470. 06/27/78 16.27.43. PAGE 
SYMBOLIC REFERENCE TABLE. 
pat 3 PROGRAH® 2709 aun Ss avade 
LOAONR 6 PROGRAH®e 2/02 € 2/09 & 


SvSs .9 EXTERNAL® 2/13 


1 F 
‘ 


& 
I 
e2) 


LOAD KAP - LOADNAR 


. CYBER LOADER §.4-470 


fwA OF THE LOAD aa 

LWAel OF THE LOAD 1s? 

TRANSFER ADORESS -- LOADNR naa 

PROGRAM ENTRY POINTS -- LOADNR wa 

PROGRAM AND ALOCK ASSIGNMENTS. 

BLOCK ADDRESS LENGTH FILE DATE PHOCSSR VER LEVEL HARDWARE  CONHENTS 
LOADNR ma 6 (60 06727778 COMPASS 3.5 470 

SYS.AM wir 40 SL-SYSLIB 05/16/78 COMPASS 3.5 470 


e025 CP SECONDS 


OunNp RELATIVE 


oorte 
oonhs © 


51100 00084 8O611 46000 
00000 00000 00012 34567 


132008 CM STORAGE USED 1 TABLE MOVE | 


MMP CIE DET) 


20650 02006 001821 46000 
0000 00000 00012 34567 


51600 00196 78402 47021 
00000 00000 00000 00000 


MFF NB2- CYB17S-SNI 4LOI/R68 05/15/78 
16.17.43 .DONOOLS FROM 4SH 
16.17-41.1P 000002564 WOHODS ~- FILE INPUT 
16.37.41.00N. PSOeOZTIAA TZCTOLIAMILLER 
16.37.82. COMPASS. 
16.3743. ASSEMBLY COMPLETE. #73008 SCH USED. 
16.17.43. 0.069 CPU SECONDS ASSEHOLY TIHE. 
16.17.%3.160. 
16.37.44. OHPCDI20127) 
16.17-46.0P 00000640 WORDS - FILE OUTPUT » OC 40 


» DOC 04 


16.37.4%.US 3586 woRUS 1 71668 WAX USED) 
16.37.44%,CPA 0122 SEC. e122 ADJ. 
16.17.44.10 «628 SEC. 2628 AOS. 
16.57.46.CH 9.760 KWS. 595 ADJ. 
$6.17.44.5S 2.366 

16.17.4%.PP 3.224 SEC. DATE 06727776 


16.8704%.E) END OF JOBs SH 


O6/27778 16.57 .o4e 


PAGE a 


PROCESS SYSTEM REQUEST. 


02000 00132 00000 00000 


n 
iad) 


PROGRAM TESTSET Teasite oPpt=t 


FIN 4,7¢470 


06/27/78 16.17.57 PAGE 4 


COMPASS 3.5-470, 0672777A 16.17.58. PAGE 1 


i ' PROGRAM TESTSET (OUTPUT) 
; ‘ COMMON //ANSWER (4) 
CALL SETS 
‘ PRINE Le (ANSWER CED ofededd 
5 2 FORMAT EPR 415K 00209) 
END . 
SETS 


STORAGE ALLOCATION. 
ADDRESS = LENGTH 


: 0 14 
‘ ik 


; : 
a sets 


46000 
S110000010 « 
5120000011 « 
StJoooo0l2 « 
5140000083 « 
6110200000 
73611 
$160000000 C 
73721 
5 5170000001 C 
73631 
6 5160000002 C 
7 


oe NY wo 


e 


73741 
5170000003 C 
0400000000 « 
10 00000000000006123456 
13 00000000000001423456 
12 000000000000018312245 
13. 00000000000006312345 


PINARY CONTHOL CARNS. 


fORNT SETS 

END 
ALOCKS TYPE ADDRESS LENGTN 
PROGRAN® LOCAL 0 14 


4/ COMMON 0 4 


"ENTRY POINTS, 


COMPASS 3.5-470. 06727778 16.17 SA. PAGE 2 


SETS Oe 
JOFNT SETS 
ENTRY SETS 
SFIS wo 


SAI AUF 0 
SA2 AUF of 
SA} RUF 02 


SAS AUF eS 
SAI 2000008 
SX6 Qbeoxl 
SA6 ANS 
Sx? Qilen2 
Sa? ANS¢} 
Sx6 Alex} 

. SAB ANSe?d 


Sx? Alex 
Sa? aNSe) 
€Q — SETS 

BUF DATA 61234568 
CON . 1623456 . 
DATA 13323458 
CON 4312345"A 


USE ww 
0 ry ANS ess 4 
14 END” 
473008 SCH STORAGE USED 24 STATEMENTS 
MODEL 174 ASSEMALY 0.029 SECONDS 


nomnmeeeeeeenReRean ww mm 


MFF NB2- CYBI7TS-SNI 4LQ7/R6BH «05/15/78 
16.17.55.DONO0HA FRO 45H 
16.37255.1P 00000320 WORDS - FILE INPUT 96 OC 04 


16.17.55.D0N. PSOeOZTALTZCTOLIASHILLER - 
16017.560F TNeR#0., 

16.17.59. 2803 CP SECONDS CONPILATION TIME 

160) 7.59 .MAP oPART. 

16.37-59.1LG60. 

16.18.03. END VESTSET 

16.18.03. 2020 CP SECONDS EXECUTION TIME 


16.18203.0P 000018952 WORDS - FILE OUTPUT » OC 40 
16.16.03.KS 3984 woRDS ¢ 17920 MAK USEO) 


16.38.03,CPA e272 SEC. e272 ADS. 
§6.38.03.10 1.582 SEC. 1.582 ADJ. 
16.18.03,CH 29.518 KYS. ? 1.801 ADJ. 
16.16.03.55 , 3.666 

16.38.03.PP 6.529 SEC. DATE 06/27/7768 


16.16.03.63 ENO OF JOB» SH 


3 SYMBOLS 
33 REFERENCES 


H 


1 


L-? 


LNAD MAP = TESTSET 


FWA OF THE LOAD iol 

Lwael OF THE LOAD 7257 

TRANSFER ADDRESS -- TESTSET 2173 

PROGRAM ENTRY POINTS -- TESTSET rao 
PROGRAM AND BLOCK ASSIGNMENTS, 

BLOCK ADDRESS LENGTH FILE pate PROCSSR VER 
TESTSET ann 2077 Lco 06/27776 FIN 4.7? 470 
Sets 2210 14 co 06727778 COMPASS 3.5 470 
SYSAID® 2226. 1 SL-FORTRAN 05702778 COMPASS 3.5 470 
751P.ENDS 2225 a | 
FECL Cet 2226 25 
708.1007 225) 1? 
Q2NTRY= 2352 0 SL-FORTRAN 05/02/78 COMPASS 9.5 470 
7FCLEENTS 2352 &2 
comMtioe 2416 14 SL-FORTRAN 05702778 COMPASS 3.5 470 
FCLeFOL 2430 40 SL-FORTRAN 05/02/78 COHPASS 3.5 470 
FMTAP® 2470 - 377 SL-FORTRAN 05702776 CUMPASS 3.5 670 
FORUTL® 3067 a6 SL-FORTRAN 05/02/78 COMPASS 3.5 470 
GETFIT# 3135 61. SL-FORTRAN 05/02/78 COMPASS 3.5 470 
KODER= 3216 461 SL-FORTRAN 05/02/78 COMPASS 3.5 %70- 
ouTce 367? 150 SL-FORTRAN 05/02/78 COMPASS 3.5 470 
FECHSKs 4047 41 SL-FORTRAN 05/02/78 COHPASS 3.5 470 
FLToUTS= 4110 31S SL-FORTRAN 05/02/76 COHPASS 3.5 470 
FORSYS# 4425 302 SL-FORTRAN 05/02/78 COMPASS 3.5 470 
OUTCOMe 4727 204 SL-FORTRAN 05/02/78 COMPASS 325 470 
CMF ALF $133 160 SL-SYSLIB 05702778 COMPASS 3.5 470 
CMF CSF $319 6 SL-SYSLIB 05/02/78 COMPASS 3.$ 470 
CHM FFA $321 14 Sti-SYSLIB 05/02/7768 COMPASS 3.5 470 
CMF FRE $335 36 SL-SYSLIB 05/02/78 COMPASS 3.5 470 
CMM,R 5373 213 SL-SYSLIA 05702778 CONPASS 3.5 470 
CMF SUF 5606 22 SL-SYSLIG 05702778 COMPASS 3.5 470 
CTL8AN $630 601 SL-SYSLIB 057027786 COMPASS 3.5 470 
EARSAM 6431 25 SL-SYSLIO® 05/02/78 COMPASS 3.5 470 
LISTSAN 6456 66 SL-SYSLIB - 05702778 COMPASS 3.5 470 
JFDL COMMS 6544 a 
FUL.RES 6560 211 SL-SYSLI® .05/16778 COMPASS 3.5 470 
FOL MME orn 222 SL-SYSLIB 05716776 COMPASS 3.5 470 
SYS.AN 7213 40 SL-SYSLIA 05/16/78 COMPASS 3.5 470 

Ml "72539 ry 

e117 CP SECONNS 23300R cM STORAGE USED 
RAR RAARERARELL TELS 


00000000000000 1914456 


00000000000000027345? 


CYNER LOADER 1.4-470 


047777718 16.,.8AR.O8. PAGE t 


LEVEL HARDWARE COMMENTS 


7oTx I PROGPAM OP Tel 


LINK BETWEEN SYS@AID AND INITEALEZATION CODE. 


FCL INITIALIZATION ROUTINE, 


COMMON CODED 170 ROUTINES AND CONSTANTS. 
FCL CAPSULE LOADING 

CRACK APLEST AND FORMAT FOR KODER/KRAKER. 
FCL MISC. UTILETIES. : 
LOCATE AN FIT GIVEN A FILE NAME, 

OUTPUT FORMAT INTERPRETER, 

FORMATTED WRITE FORTRAN RECORD. 
INITEALIZE CONSTANTS. 

COHMON FLOATING OUTPUT CODE 

FORTRAN OBJECT LIBRARY UTILITIES. 
COMMON OUTPUT CODE 

CHM VA} = ALLOCATE FIXED. 


CHM VI, = CHANGE SPECS FIXED. 
CMM V1.9 © FIXED FREE ALGORITHM, 
CHM VIR > FREE FEXED. 

CHM V3.1 = RESIDENT SURROUTINES,. 
CMM VI,t - SHRINK AT LWA FIXED. 


CRM CONTROLLING ROUTINE, 
CRM ERROR PROCESSOR ENTRY. 
CRM ~ ALLOCATE SPACE FOR LEST OF FILES: 


FAST. DYNAMIC LOADER RESTOENT. 
FOL MEMORY MANAGER INTERFACE. 
PROCESS SYSTEM REQUEST. 


12 TABLE MOVES 


PIITTIVIVITTTISI2I6S 


| | 


| Instruction SX6  Bl1+X] 
(X1) = 0000000000006123456¢ 123456 


(Bl) = 200000, 200000 


(X6) 


00000000000000323456. 323456 
TRUNCATION AND SIGN EXTENSION 


INSTRUCTION SX7  B1+X2 


~~ (2) = 00000000000001623456,g 623456 
(BL) = 2000002 |200000 
= 00000000000000023457. 11023456 


(X7) 
| Enp-ARounD-CARRY 1 
TRUNCATION AND S1GN ExTeNsIon 023457 


INSTRUCTION SX6 = BI+X3 


= 00000000000001312345, 312345 ° 
(Bl) = | 200000, 200000 
TI LIT IIIT ITT T SALSA Og SLD 5RS 


SIGN EXTENSION AND TRUNCATION 


InstRUcCTION SX7  BI1+X4 


(4) = 00000000000006312345. 312345 
(Bl) = - 200000, 200000 
(X7) = 77777777777777512345. sg aie 


S1GN EXTENSION AND TRUNCATION 


onmRmaemeemReeeaeeeeewe eee ee 


LONG ADD UNIT 


(INTEGER ARITHMETIC) 


App A “X” REGISTER TO A “X” REGISTER 


SUBTRACT A “X” REGISTER FROM A “X” REGISTER 


60-Brt ARITHMETIC 


ADD UNIT 


(FLOATING Point ARITHMETIC) 


ADD - Two "X” REGISTERS, SINGLE PRECISION OR DOUBLE 
PRECISION, 

ADD - two "X” REGISTERS, SINGLE PRECISION ROUNDED, 

SUBTRACT - Two “X” REGISTERS, SINGLE PRECISION OR 


DOUBLE PRECISION, 


SUBTRACT - Two "X” REGISTERS, SINGLE PRECISION 
ROUNDED, 


96-BIT ADDER PLUS EXPONENT 


' 


MULTIPLY UNIT 


(FLOATING Pornt ARITHMETIC) 


FX MULTIPLY SINGLE PRECISION (1ST HALF OF ADDER) 
RX MULTIPLY SINGLE PRECISION ROUNDED 


DX MULTIPLY DOUBLE PRECISION (2ND HALF OF ADDER) 


96-BIT ADDER PLUS EXPONENETS 


FX 
RX 
NO 
CX 


DIVIDE UNIT 


(FLOATING Potnt ARITHMETIC) 


DIVIDE 
ROUNDED DIVIDE 


No OPERATION 


COUNT ONE BITS 


: ; 


BRANCH UNIT 


( JUMPS) 


TEST THE VALUE OF A "X” oR “B” REGISTER 


- TEST THE VALUE OF A “X” REGISTER 


ComPaRE A “B” REGISTER To A "B” REGISTER 


PROGRAM Stop 


Go To K+Br 


RETURN JUMP 


_ Central ExcHANce Jump 


READ EXTENDED CORE STORAGE 
WRITE EXTENDED CORE STORAGE: 


631te 
6020000003 
@710@00000 A 


2 
0617000000 R 
3 0209000004 « 
& eaenececoe x : 
S 0400000000 & 
6 €400000000 x 
7 epleonecee c 
0219000000 
fo e200008008 « 
11 0400000000 « 
e | 
t2 
473008 sen 
JUKF 
SYMBOLIC REFERENCE TABLE. 
ENTER r PROGRAM 
: €rROR e En TENNALO 
Ha 0400 e DON 
AoUTINO 0 EXTERNAL® 
Routine 0 ExteERnace 
houtin2 0 EXTERNAL® 
TAOLE 4° = PROGRAHe 


curer 


e 
TABLE 


HOLNADR 


STORAOE USED 
MODEL 174 ASSEMBLY 


2702 € 
FAL) 
2726 
2716 
2719 
2720 
2706 


COMPASS 3.5-470. 06727778 09,00.32. PAGE 2 


fOFNE 
fNIAY 


Jump 
ENTER . 


ILLUSTRATE VARIOUS USES OF JUMP INSTRUCTION 


JUMPS TO ONE OF THREE ROUTINES 


EXAMPLE 2 = JUNP TABLE ~ 
DEPENDING UPON THE VALU PASSES IN Ag 


Ass? t 

sai nt 

sae 5] i 

NG Al esXERROR 

GE AbeB2 oe KERROR 

JP TABLE *81 

€0 a XROUTING : : 

€O aKROUTING NOTE THE FORCING UPPER 

€Q akRoutin2d JP eKROUTING 


COULD BE 
EXAMPLE 2 - JUMP TO MEMORY LOCATION HOLDADR 


HOLDADR 
Al 


SBt 


JP EQUIVALENT 10 JP O6epl 


EXAMPLE 3 - NON ENDEXEO JUMP 


JP ENTER EQUIVALENT 10 JP BOCENTER 

€aQ ENTEN EQUIVALENT 10 EQ BOsHOcENTER 
use /00N/ 

ASS 1 

‘END ENTER 


7 SYMBOLS 
£9 REFERENCES 


39 STATEMENTS 
0.034 SECONDS 


PAGE 


COHPASS 3.5-4676, 04727778 09,080.32. 3. 
27d 2/3) 2704 
esis 
27a 
2700 0 


SE-P 


JUMP 
STORAGE ALLOCATION. 
anoress 
) 
12 


LENGTH 
i2 


COMPASS 3.5-470, 04729776 09.00.32. 


BINAHY CONTHOL CARDS. 


1OFNE = jUMP 
EN ° ENTER 


ALOCKS TYPE ADDRESS LENGTH 
PROGRAN® LOCAL 0 l2 
OON COMMON ‘ 0 i 


ENTRY POINTS. 


ENTER oe 


_EATERNAL SYMBOLS. 


ROVUTIN2 ROUTINE ROUTING ERROR 


ure NA2- CvB175-SNi 4L87/ARGB 05715778 
09.00.31.00N005) FROM 7SH 
09.00,.33.91P 00000256 WORDS - FILE INPUT » OC 04 
09.00.31 ..00N. PSHCOZSTALTACTORIACMILLER 
09.00.32. COMPASS, 
09,002.33, ASSEHULY COMPLETE, 47300A SCM USED. 
09,0023). 0.065 CPU SECONDS ASSEKOLY TIME. 
€9.00233.0P 60000640 wORDS - FILE OUTPUT e OC 40 
09.00033.NS 3584 woRUs§ ( 10752 MAX USED) 


09,00.33.CPA e109 SEC. 2100 ADJ. 
09.00.33.10 0474 SEC. 0474 ADS. 
09.00.39.CM 8.514 nwS, 0ST ADJ. 
09,00.33.55 , 2.102 


, 09,.00.33.PF 20291 SEC. DATE 06727778 


09,00.33.F) END OF JOH. SH 


PAGE 


9T=7 


JUMPS 
STORAGE ALLOCeTION, 


ALDRESS = LENGTH 
® iS 
1s . 
JUMPS 
@ 700000016 » 
1 0240009000)4 ¢ 
6400000084 
2 O7000n0084 « 
y O4100000146 « 
0410000014 
& 6520000014 « 
0520000014 
5S e630¢00084 « 
0630000014 
6 86306000146 « 
e7ancoools 
vy e7e00neels « 
; 6740000014 
10 O71S008014 @ 
0303000084 
18 0329000014 - 
0331000014 
$2 726024702) 
ik ‘ 
is 


473008 SCH 


COMPASS 3.5-670, 06727798 08.56.05. PAGE 


BINARY CONTHOL CARDS, ' 


nent 
END 


FNIRY POINTS, 


JUMP 


JUMPS 
JjuMP 


EATERNAL SvMAOLS. 


SvSe 
COMPASS 3.5-470, 06/27/78 08.56.05. PAGE 
fOrNs = juMPS 
FNIAY UMP 
® 
‘~@ 
° CONE GENERATED AY VARTOUS UMP INSTRUCTIONS 
e 
e 
JUMP JP TAG UNCONDITIONAL JUMP 
fo ROA TAG 
£0 TAG 
as TAG VOIDS STACK IN ALL SYSTEMS 
e 
€0 AL MOSTAG CONDITIONAL JUHP 8 REGISTER EQUAL TERO 
za ALeTAG 
. 
NE R2,HOeTAG CONDITIONAL JUMP 8 REGISTER UNEQUAL TO ZERO 
w2z N2.TAG . 
e 
Ge AI,HO.TAG POSITIVE O REGISTER TEST 
le AO.HIeTAG 
PL AJ.TAG 
e 
ut 84-80eTAG NEGATIVE 8 REGISTER TEST 
GT AO -B4eTAG 
NG AL, TAG ’ 
tC 
wz Rde TAG UNEQUAL ZERO KR REGISTER TEST 
zm, abetaG €QUuAL 7ERO KR REGISTER TEST 
PL nbeVaa POSETIVE KR REGISTER TEST 
NG uLe FAG NEGATIVE KR REGISTER TEST 
e ‘s 
CNNRUN 
TAG ass 1 A LOCATION TO JUMP TO 
END JUNP 
STORAGE USED 37 STATEMENTS 3 SYMBOLS 
MONEL 17% ASSEMAL 


y 0.041 SECONDS 22 REFERENCES 


2 


eT NE ARE NT A TS it ii dee amma Sse iE NEA Li hie I iT Sa eee I RA a EO FG i aie GS a Se GRIESE ARE ae al i 


LIi-? 


JUMPS 
SYMAOLEC REFERENCE PARLE. 
JUMP t PuoGHaNe 2702 € f70a t 
Syse 0 FaTERMNALS 2/33 
TaG it) PROGRANe 2708 arti 
: 2709 avi) 
2710 2714 


“FEF NR2- CYAI7IS-SNI 


COMPASS 3.5-470, 067297776 08.56.05. . PAGE 
2716 2ren 2728-228 2799 t 
avur 272i 2725 2729 
2719 272) 272? 2730 


8LO7T/AGB «05/15/78 


06.56.01 .00N0044 FROM 75H 


08.56.01.1P 60000256 WORDS 


- FILE INPUT » OC 04 


08.56.01.D0N. PS0e021Be I2CTOLIASMELLER 


06.56.04. COMPASS, 
06.56.05, ASSEMBLY COMPLETE, 


473008 SCM USED. 


00.56.05, @.093 CPU SECONDS ASSEMBLY TIME. 


04.56.05.0P 60000576 wOHDS 
06.56.05.4S 3564 woRDSs 


06.56.05.CPA 026 SEC. 
06.56.05.10 47) SEC. 
08.56.05.CM 6.531 KwS. 
06.56.05.55 7 
06.56.05.P 4.012 SEC. 


06.56.05.€) END OF JOBs SH 


- FILE OUTPUT « OC 40 
( 71166 MAK USEO) 
0126 ADJ. 
047) ADS. 
2520 ADJo 
d.tei 
DATE 06727778 


IDENT MAIN 


ENDRUN 
END Ss 


LINKAGE + ENTRY-EXT-RJ 


BHeReoaenmeemeHmRG@agagaeaanktrtnknmtmt wm ms 
ATESE COMPASS 3.5-676. 66/27/7768 06.52.06. PAGE 2 


1OENT OSTEST 
ENTRY AITEST 


e- 
e 
° ERAMPLE OF CODE GENERATED Ny A RETURN JUHP AY INSTRUCTION 
e 
e 
@ 9100000002 « HITEST 6A sun 
8 0200000000 ,| |) 
e 
e 
e 
Pt RRA RR RAPA DARA EREL Sus OATA = =-0 
3 0400000002 « €0 SUB 
ry €ND AITEST : 
873008 SCH STORAGE USED 15 STATEMENTS ® SYMAOLS 
MODEL 874 ASSEMOLY 0.0182 SECONDS § REFERENCES 
LOAD MAP - MITEST CYAER LOADFA 1.4-470 06727778 0f.S2.06. Pact 1 
. 
pan Fuad OF THE (OAD a | 
ve) (wae) OF Ihe LOAD a5 
TRANSFER ADDRESS -- RITEST ttt 
PROGRAM FNTAY POINTS <-- AITEST uns 


PROGRAM AND BLOCK ASSIGNMENTS. 


* BLOCK BDDHESS LENGTH FILE OaTeE PAOCSSR VER LEVEL HARDWARE COMMENTS 
astest a0 4 Loo 04/27/7186 COHPASS 3.5 a7e 
007 CP SECONDS 132008 CH STORAGE USED 1 TARLE MOVE : 


DUMP ATL ATIVE OMP TID OES 


04000 OO112 en000 00000 


olin 01000 00117 stoon 46000 02000 00000 41000 46900 
Sri : - HOLET> 40000 00000 n4004 onli? 4 


oolls 04000 09393 H1nnn 46000 eoodn anonn oFnns OO11S 


wytest COMPASS 3.5-470 0 
Oe avecestioas of ® A727/TA Of ,52.046. PAGE 1 


APORESS LENGTH AINAHY CONTHOL CARDS. 
6 4 1OENe HES! 
& END estest 


FNTRY POINTS, 


AITEST oe 


Pp ee0008 a0 000200 80 000000 

pa 225200 Af oooool Bt ooooot Ciatd= 0000 9000 0000 0000 0000 Cinide 9000 b008 C000 e008 0080 

FL @00700 Az 000060 82 000002 Ctazbe 1505 81520 0000 0000 006k CIR2b@ 9000 0000 0000 0008 8000 

em 700700 ad 00005? 6? 04273) CtAdD= 6000 0000 0000 0000 0000 Cinta 

Ac e000sh As C0000) 84 000208 Ctasre 0000 2000 6400 0000 0000 Cinate 

FE 000000 AS 000sRT AS ooostt CtaSre 0106 O08 1368 H004 6000 CINSd= O860 OOoh 1368 Coos 6008 

HA 000400 AG 0G0008 86 000200 Ctabpe 0000 0000 0000 o0n0 0000 Ctpote : 
al oooook AF O277S6 CiaTbe 0000 6000 0000 0000 0060 Ctaltea 

ne 6000 0000 0000 e000 0000 . 

nb 0000 0000 9000 0000 0000 

n2. 1505 31520 0000 0000 006} 

x} 0000 0000 0000 0000 0000 

ne 0000 0000 0000 0800 0000 

NS 6000 0000 0004 0040 0000 

16 1505 $8520 0000 0000 0065 

KP 0060 0000 0009 6000 0000 


& 

he 00054 S6blo 3810 00054 54710 $1108 00008 03110 00055 64550 02550 90008 46000 ecvoee 60008 90000 80008 

oO 00060 15058 52000 000006 ooo6! 00000 00200 nance oooot 07040 00060 51608 0000! 04008 60063 80000 00021 
000646 BA078. T0908 00000 00000 00000 00000 0000 00115 40000 00008 62000 oottl 00008 00008 40000 00008 
ooore paoth 75755 G0000 00000 : 00000 00000 n0000 00000 


60n00 #53008 00000 o1000 0000) 


unr wA2z- CvAbTS-SNI aLBrsnee 05735778 


00.52.04,00N0Nsa FAQN SH 

08.52.04,1F 00000192 wonos - FILE INPUT © DC 04 
06.52.04.D0N. PSOoOZIBe TZCTOLIAMILLER 
08.52.06, COMPASS. 

0f.52.06. ASSEHOLY conpcete. %7300R SCH uso. 
06.52.06., 0.062 ceu SECONDS ASSEMALY TIHE. 
08,52.06.,100. 

08.52.07. ERROR HODE 060- ADDRESS #000000 ' 
00.5207 EMIT. : 

00.52.07 DHO CHRD RET 

00.52-07.0P 00000768 WORDS - FILE ouTPut » OC 40 
06.52.07 .MS 3504 wonOsS ¢ 20752 HAK USED) 


OA.52.01 CPA 2300 SEC. 2800 ADJ. 
00.52.07.10 2619 SEC. 2419 ADS. 
08.52.07.CH 9.242 MWS. 0569 ADIs 
06.52.07.35 1.20) 
06,.52.07.PP 2.005. SEC. HATE 06/27/78 


a 4 
ee ee at ono no 
annum mw mm 


BX 


BOOLEAN UNIT 


TRANSMIT A “X” REGISTER TO ANOTHER “X” REGISTER: 


OR TRANSMIT COMPLEMENT FROM A “X” REGISTER TO 
ANOTHER “X” REGISTER, 


TRANSMIT A “X” REGISTER AND THE COMPLEMENT OF 


- ANOTHER “X” REGISTER, 


TRANSMIT 
LOGICAL PRODUCT CAND) 
LOGICAL SUM COR) 


LOGICAL DIFFERENCE § (EXCLUSIVE OR) 


60-Bit ARITHMETIC 


BOOLEAN LOGICAL PRODUCT 


THE BOOLEAN LOGICAL PRODUCT IS USED MAINLY FOR MASKING 
PURPOSES, THIS FUNCTION COMPARES Two X REGISTERS BIT 
BY BIT. IF THE BITS IN BOTH REGISTERS ARE TRUE (I.E, 
SET TO 1), THEN THE CORRESPONDING BIT IS SET IN THE 
RESULT REGISTER, 


FOR EXAMPLE, ASSUME THE FOLLOWING BIT PATTERNS: 


(X1)=00000 .... . « . 02010 11100 
(X2)=00000....... . 00000 11122 
BX3 X1*X2 wouLp PRODUCE: 
(X3)=00000 ....... . 09000 11100 


IN THIS WAY A PROGRAMMER CAN MASK OUT A PORTION OF ONE 
X REGISTER BY SETTING ZERO BIT INA SECOND REGISTER 
AND PERFORMING A BOOLEAN LOGICAL PRODUCT OPERATION -IN- 
TO A THIRD REGISTER, THE THIRD REGISTER CONTAINS ONLY 
THE PORTION OF THE FIRST X REGISTER THAT THE PROGRAMMER 
WANTS TO EXAMINE, 


FOR EXAMPLE. ASSUME THAT (X1)=0000 0111 2222 3333 444u, 
A PROGRAMMER WOULD LIKE TO EXTRACT THE FIRST EIGHT 
OCTAL DIGITS OF THIS REGISTER AND ZERO-OUT THE REMAIN- 
DER OF THE CONTENTS, THIS COULD BE DONE AS FOLLOWS: 


MX2 24 (X2)=7777 7777 0000 0000 0000 
BX3 X1*X2_—-(X3)=0000 0111 0000 0000 0000 


To EXTRACT THE CONTENTS OF THE LOWEST SIX OCTAL DIGITS. © 


THE FOLLOWING INSTRUCTIONS COULD BE USED: 
SX2_ 777777B (X2)=0000 0000 0900 0077 7777 
BX3 X1*X2_—s (X3)=0000 0000 0000 0033 4444 - 


CoMPLEMENTS CAN ALSO BE USED TO CLEAR SPECIFIED AREAS 
OF A WORD: 


SX2  770000B (X2)=0000 0000 0000 0077 0000 
BX3 =X2*X1_ = (X3)=0000 0111 2222 3300 4tuu 


2 : a 7 ar y 7 " z. 7 


BOOLEAN LOGICAL SUM 


‘THE BOOLEAN LOGICAL SUM IS USED FOR. INSERTING DATA 
INTO A PORTION OF A WORD. THIS FUNCTION COMPARES TWO 
X REGISTERS BIT BY BIT, IF EITHER REGISTER HAS A 
TRUE BIT (1,.E.- A BIT SET TO 1), THE CORRESPONDING 
BIT IN THE RESULT REGISTER IS SET To l, 


FoR EXAMPLE, ASSUME THE FOLLOWING BIT PATTERNS: 


(X1)=0000....... , 01110 00001 

(X2)=0000 . . » » « » « « 00000 11001 
BX3 = X1+X2 WOULD PRODUCE: 

(X3)=00000 . ..... . 01110 11001 


A PROGRAMMER CAN USE A BOOLEAN SUM INSTRUCTION TO EN- 
SURE THAT A SPECIFIC BIT IS SET IN AN X_REGISTER, TO 
SET BIT 0, THIS PROCEDURE COULD BE USED: 


(XT)=1111 2222 3333 4444 5555 


So 4 


(X2)=0000 0000 0000 0000 0001 
BX3. _X2+X1 
—— (X3)=1111 2222 3333 4444 5555 | 
To SET BIT 59, THIS PROCEDURE COULD BE USED: 


(X1)=1111 2222 3333 4444 5555 


m2 1 
(X2)=4000 0000 0000 0000 0000 
BX3 X24X1 


(X3)=5111 2222 3333 4444 5555 


4-23 


BOOLEAN LOGICAL DIFFERENCE 
THE BOOLEAN LOGICAL DIFFERENCE IS USED FOR COMPARING 
BIT PATTERNS AND COMPLEMENTING PORTIONS OF X REGIS- 
TERS, THIS FUNCTION COMPARES TWO X REGISTERS BIT BY 
BIT AND SETS A BIT IN THE RESULT REGISTER IF THE BITS 
IN THE OPERAND REGISTERS ARE DIFFERENT, THUS IT IS A 
TEST FOR DIFFERENCE, 
For EXAMPLE, ASSUME THE FOLLOWING BIT PATTERNS: 
(X1)=0000 ......, . 01110 00001 
(X2)=0000 ...... . 01110 10000 


BX3. X1-X2 woULD PRODUCE: 


(X3)=00000 . ... + . 00000 10001 
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THE BOOLEAN LOGICAL PRODUCT IS USED FOR MASKING, 


THE BXI INSTRUCTION COMPARES Two X REGISTERS, BIT-BY- 
BIT; 


IF BOTH BITS ARE TRUE, SET TO 1, THEN THE CORRESPOND- 
ING BIT IN THE RESULT REGISTER IS ALSO SET To l, 


J™= KOI 
i ab 4 
22 10> 30 
OY =T: “0 
0 0 0 


A PROGRAMMER CAN USE THIS TO MASK PORTIONS OF A REGIS- 
TER BY SETTING THE CORRESPONDING BITS TO ZERO IN A 
SECOND REGISTER AND PERFORMING THE LOGICAL PRODUCT 
OPERATION. 


THE BOOLEAN INSTRUCTION IS ALSO USED TO TRANSMIT EN- 


TIRE WORD FROM ONE X REGISTER TO ANOTHER. 


BooLeEAN LOGICAL SUM, 


INSERT DATA INTO PORTION OF A WORD, 


TWO REGISTERS ARE COMPARED ON A BIT-BY-BIT BASIS, 


IF EITHER OR BOTH BITS ARE TRUE- SET To 1, THEN THE 
CORRESPONDING BIT IN THE RESULT REGISTER IS ALSO SET 


To l, 
J+ K-93! 
de ole - ah 
 .0. 2 
0 1 ii 
0 0 0 


SPECIFIC BITS CAN BE SET USING THIS METHOD, 


BOOLEAN LOGICAL DIFFERENCE, 
INSERT DATA INTO A PORTION OF A WORD, 
Two REGISTERS ARE COMPARED ON A BIT-BY-BIT BASIS, 


IF BOTH BITS ARE TRUE, SET TO 1 OR IF BOTH BITS ARE 

FALSE, SET TO 0, THEN THE CORRESPONDING BIT IN THE 

RESULT REGISTER IS SET TO 0, IF THE BITS BEING COM- 
PARED ARE UNLIKE, THEN THE BIT IN THE RESULT REGIS- 

TER IS SET Tol, 


J- K-31 
1 1 9Q 
too] 
Ode ot 
0 0 0 
4-27 


BOOLEAN INSTRUCTIONS 


HERE IS A LIST OF THE BOOLEAN INSTRUCTIONS: 
BX2 X1 BX2 -X1 TRANSFERS 
BX3 X2+X1 BX3 -X2*X1 Logica AND 
BX3 X2+X1_ BX3 -X2+X1 Locicat OR 
BX3. X2-X1 BX3 ~-X2-X1 LogicaL eExcLusive OR 
MX4 12 Tr SET UPPER BITS 
CX3 X4 | COUNT ONE BITS 
To TRANSMIT THE ENTIRE 60 BITS FROM ONE X REGISTER TO 
ANOTHER, THE BOOLEAN TRANSFER INSTRUCTION IS USED, 
FoR EXAMPLE, ASSUME: 
(X1) 0000 5555 0000 0000 0000 
THE Instruction BX2 X1 propuces: 


(X2) 0000 5555 0000 0000 0000 


THE INSTRUCTION BX2 -X1 PRoDUCES: 


(X2) 7777 2222 1177 1777 1777 


SHIFT UNIT 


LX | LEFT CIRCULAR 
AX RIGHT Enp-OFF 


SHIFT COUNT MAY BE IN THE INSTRUCTION OR A “B” REGIS- 
TER. A NEGATIVE SHIFT COUNT IN A “B” REGISTER REVERSES 
THE DIRECTION OF THE SHIFT, THE DESTINATION REGISTER 
MAY BE DIFFERENT FROM THE SOURCE REGISTER, 


MX Form Mask 

FLoaTING Point NUMBERS 
NX NoRMALIZE 
PX PACK 


UX  UNPACK 
ZX  NoRMALIZE ROUNDED 


4-29 


SHIET_INSTRUCTIONS: 


1: 


LEFT SHIFT, WHICH MOVES BITS LEFTWARD AND END- 
AROUND (FROM THE TOP OF THE WORD TO THE BOTTOM), 


FoR EXAMPLE, IF THE BIT STRUCTURE OF AN X REGIS- 
TER IS: . 


11110 00000 00000. . ,.... 00021 


A LEFT SHIFT OF THREE WOULD PRODUCE: 


10000 00000 00000... .....,.012121 


-RIGHT SHIFT, WHICH MOVES BITS RIGHTWARD AND BITS 


ON THE RIGHT END ARE LOST AS THE SHIFT PROGRESSES, 
Bit 59 (THE SIGN BIT) IS EXTENDED, 


FOR EXAMPLE, IF THE BIT STRUCTURE OF AN X REGIS- 


TER IS: 
TET TO 00000 304: o> ace g 52 DOLL 


A RIGHT SHIFT OF THREE WOULD PRODUCE: 


STITT: T1000 i: ce. gaa ai 00000 


THERE ARE EIGHT COMPASS INSTRUCTIONS WHICH PRODUCE 
LEFT AND RIGHT SHIFTS, THE FOLLOWING EXAMPLES SHOW 
THE EFFECT OF EACH INSTRUCTION, 


ASSUME THAT BEFORE EACH OPERATION: 
(X1)=70700 00000 00000 00007 


LX1 6 PRODUCES A LEFT SHIFT OF SIX BITS (TWO OCTAL 


- DIGITS), 


—~ — (X1) now=70000 00090 00000 00770 


LX1 -6 PRODUCES A LEFT SHIFT oF 54 (60-6) BITS: THIS 
LOOKS LIKE A RIGHT END-AROUND SHIFT OF SIX BITS, 


(X1) woutp Be 07707 09000 00000 00000 
AX1 6 PRODUCES A RIGHT SHIFT OF SIX BITS, 


(X1)477707 00000 00000 o0000 
AX1 -6 PRODUCES A RIGHT SHIFT oF 54 (60-6) BITS, 
(X1)=77777 77777 77777 77770 
LX2 X1,Bl (Bl)=6 PRODUCES A LEFT SHIFT OF SIX BITS, 
~ (X2)=70000 00000 00000 00770 


LX2 X1,Bl (B1)=-6 probuces A RIGHT END OFF SHIFT OF 
SIX BITS, 


(X2)=77707 00000 00000 00000 


AX2 X1.Bl (B1)=6 PRODUCES A RIGHT END OFF SHIFT OF 
SIX BITS, 


(X2)=77707 00000 00000 00000 
AX2 X1,Bl (B1)=-6 PRODUCES A LEFT SHIFT OF SIX BITS, 
(X2) 70000 00000 00000 00770 
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Booleans and Shifts 
Shift Examples 


[Dent SHIFT 
evTry SalFT 
Y 2FS20-NOCEEUMIOLINGL NUMSE QOara Le2e-0010 
« \ SHIFT “Ss i) 


° LEFT SeIe“T (Lat UK PLACES) 


# S1209¢ndu08 eo Sa} NUMBER 
20343 LA) 3 
2elus Lxt 5 
S 139 GOuy Sal NUMBER 
25173 ; LA Ss» 
6 Silvd-Guuu = SAl NUMBER 
2ul7% Lx] 4N 
e@ 
° BAITSMETIC RIGMT SMIFT (Axl JK PLACES) 
. © 
7 $i290-Hdu1 © SAa2 NUMBERS} 
21261 axe 1 
1G 51269 Coes « SAA SI7T777T7I7777 77777777778 
21272 ax? Se 
eo 
* Lert SeI=T Xn NOMINALLY 8U PLACES 
@ 
112. 61100. dus Sst 3 
Sl3cucudu0 Sas NUMLER 
le 273213 Xs Biex3 
#liu/s77774 . So} 7(77748 
13) St3eerhoug SA3 NUMBERS 
22313 LX4 Bisx3 
e 
©  AeTTHMETIC RlumT AHIFT XK NOMINALLY ou PLACES 
e , PS 
16 #3169°90us F Soi 3 
$149000003 SAs - NUMBERS 
15 73614 ake HL exe 
#310/77774 $81 “ TI77748 
16 $1404-GoOuu « Sau NUMBER 
23414 XS B1eXs 
17) 110% 9073 Set sy 
Sl“£d00ucu2 + Sas NUMBER O2 
20 22614 AXe HL exe 
*llGucl160 -$sl 11009 
21 51490*Guus SAS NUMBERS 
23614 aXe - BLexXs 
22 cl VU ClGsuduaobusuuU EN IRUN : 
en EN) SaIrt 
ATITIGA SCH STORAGE 11SED “8 STATEMENTS 2 SYAOL: 
“MODEL 76 ASS -=“s8LyY 0.025 SECONDS 13 REFERE! 


LX3 
AX3 


LX3 


 AX3 


LX3 
AX3 


INTO 


EXAMPLES OF SHIFTS 


6 
6 


(B1) 


— XIB 


X1,Bl 
X1,B2 
X1,B2 


OuT OF 


SHIFT X3 LEFT 6 BITS 
SHIFT X3 RIGHT 6 BITS 


= +3 (B2) = -3 


Lert, 3 BITS 

RiGHT, 3 BITS 
— RicHt, 3 BITS 

Lert, 3 BITS 


SHIFT COUNT. 


IDENT SHIFT. 2 
FNTRY SHIFT a 
Nn 6ngnnononnnnn00.0000 Q DATA  £000NN00000NND000NNNA 

® eH 
o iF 

1 S}1209NN00N « SHIFT S54) a a 
1001) HxX0 x) ie 
19211 Rx? x1 4 
2 19301 AX} x) Ss 
10411 ANG a 2 
rns) AXS m1 a 

1061} Axe ° KL J 

a | 97h AXT xX} Zt 
: =) 

. 21100 aX} f) eRIGHT SHIFT 0 TE. NO. CHANGE = 
w 20274 LX? 6 LEFT SHIFT 60 BITS TE. NO CHANGE — 
21312 Ax} 10 ~ 

& 2nut? LKG 10 eLEFT SHIFT 10 BITS ie 
21542 AKS -10 eRIGHT SHIFT (60-10) BITS 4 

20442 LX4 -10 eLEFT SHIFT (60-30) AITS END AQNUND =; 

S o>9NNNNDAN Jp 0 a 
f FND SHIFT ot 
ap) 

' p= 

a 


x9 4000 AHOH ADAH HN00 0000 

x} 400n OnV0 AND 0000 onnu 

x2 4000 0000 anno nn00 nn00 

¥} 777H HNVDO- 00H HOO n000 
16 6000 «HHVA ONnH HO00 1000 

ye 7777 oe TTT oT T0AN 

wh 0002 anho AnoH 9AHH = HNOV 

x7 anno Aovo AgNO ANDO o000 


; . 


SHErTA 


6 e 
0 S210000006 ¢ 
poott 
1 6190000006 
 ebzoveryer 
2 6130777700 
Grso0rTTErT 
3 6150777676 
; 22210 
22320 
& 22430 
22540 
22650 
§ 0200000008 
? eee: 
, 
Ww DMPK, 
FP 000000 Ao 000700 no 000000 
PA 220200 Al on0nt? HI 009006 
FL 000200 a2 o000ted AZ FrTTTI 
re yoo700 Ay O000S? AI TFTTOO 
PE 000045 AS OD000R Ne ITHT? 
FE 000000 aS O00198 fS 777676 
Ha 000800 46 000008 B& 000200 
af a00008 OF 027756 
R@ £000 0000 0000 9000 0000 
KR} £000 0000 ‘0000 ov00 0000 
x2 0000 0000 0000 0000 0049 
2d = =©7740 «0000 0000 0000 00n0 
me oven ovrey overe oven ontte 
XS 0000 0000 0000 O000 0000 
R6 0000 0008 0000 ov0g 0000 
xn? 0000 0000 0000 o000 000 
00000 00000 00000 00000 00000 
00058 456110 03190 00054 56710 
00060 15053 $2000 vonn0 00061 
00064 14071 7OC00 00000 O0n00 
oo0re 84071 75755 00000 00n00 
09100 #54000 00000 ¥1000 00001 


nent 


Ent 
CONSTANT CET 
sHirte SAl 
fxa 
SAL 
sn2 
SN) 
SAS 
SAS 
Ux2e 
tay 
tne 
LAS 
Lk6 
JP 
END 
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Calpe 
Cta2ye 
CUA))ea 
 CTAate 
CUASie 
Ctabte 
CtAT)e 


ay 


4000 
1505 
0000 
nn00 
Sito 
0000 
on00 


SHIFUR 
SHIF Ft 


COMPASS 1.5-670, 


LONOVODCODNDOTODNNNNN 
CONSTANT 


al 

é ‘ 
-6 
-6) 
~64 
-65 
Abyno 
H2eK0 
H3,x0 
A4ekO 
ASeKO 


Uy) 
SHIFTA 


900n 
1520 
vonn 
0000 
000) 
oo0n0 
voon 


“63 NECIMAL 


“6% DE CTHINAL 


-65 DECIMAL 
SHIFT LEFT 6 BETS 

SHIFT Right 6 BITS 

RIGHT Steer 63 PLACES 
CLEAR OFSTINATION REGISTER 


1? STATEMENTS 


0,018 SECONDS 


0u00 
0v00 
oo0n0 
0000 
1710 
0000 
0000 


0000 
0000 
0000 
oono0 
te 
0000 
9000 


Siloo o0008 031510 00055 
00009 00200 90000 onond 
00000 00000 n0000 00120 


00000 00000 00000 00000 


0000 
0061 
oonn 
0000 
6000 
oonn 
onoo 


06727778 16.18.08. 


2 SYMBOLS 
& REFERENCES 


CiAbd= gn00 0000 oon 
CIRZb2 
Cthjpe 
Ctns)s 
CtnSte 
Ctn6pe 
CtnTys 


44550 02550 00000: 46000 
07040 00040 51600 0n00) 
£0000 00000 02000 onllt 


PAGE rd 


0000 9000 


00000 00000 00000 00000 
04000 00063 00000 0002) 
00000 00000 40000 00000 


Sutra ’ 
COMPASS 1.5- 
STORAGE ALLOCATION. PANS sheen Tes 04727718 TA.TALORe PAGE ' 


arORESS LENGTH HINAHY CONTHOL CAahns, 
0 ? HOFNE <HTFTA 
? ENN sHIF tA 
ALQCKS TYPE AONRE SS LENGTH 
PROGRAM® LOCAL 0 6 
LETERALS® LOCAL 6 t 


FNTRY POINTS. 


SHIFTR oe 
LOAD MAP - SHIFTS CYHER LOADER 1.4-470 04727778 16.18.08. PAGE ’ 
FWA OF THE LOAD ath 
LwAel OF THE LOAD t20 
TRANSFER ADORESS -- SHIFTB bat 
= PROGRAM ENTAY POINTS -~- SHIFTs tn 
' 
Ww 
fon) 
PROGRAM ANO BLOCK ASSTONHENTS. 
BLOCK ADOHESS LENGTH FILE Dale PHOCSSA VER LEVEL NARDWARE COMMENTS 
SHiete ia) a | t6o 06/27/1786 COMPASS 3.5 470 
2006 CP SECONDS 132008 CM STORAGE USED 1 TABLE HOVE 


MF E NB2- CYARTS-SNI 4Le7/R68 05/15/78 


16.18.06, 00H00HA FROM /$H 
16.10.06.1P 00000320 wounps - FILE INPUT + OC 04 
16.16.06.00N. PSpeO2 Be IZCTORIAMELLER 
16.18.07. COMPASS, 
16.18.08, ASSEMALY COMPLETE. 473008 SCH USED. : 
16,136.08, 0.063 CPU SECONDS ASSEMBLY UIME. 
16.18.08.160. 


16.18.0A, ERROR KODE #00. ADORESS #000000 
16.38.09,0P 90000768 WOHOS ~- FILE OUTPUT « OC 40 


16.18.09.mS 3504 wORDS ¢ 20752 Hak USED) 
16.38.09.CPA 0096 SEC. 2096 ANI. 
16,.36.09.,10 0613 sec. 2613 ADJe 
16.18.09.CH 9.261 KwS. 2565 ADS. 
16.16.09.58 2.275 

16.38.09.PP 2.983 SEC. DATE 06/27/78 


‘ 16.58.09.€2 ENO OF JOB> SH 


_ 


USTSUET . COMPASS 365-410, 06/21/78 09.00.56. pick : 
STORAGE ALLOCATION. . 
ADOAESS LENGTH BINARY CONTHOL CARDS. 
an 32 JOENT TSTSHFT 


32 tenn STS 


ENTRY POINTS, 
TSTSHFT hae 


EXTERNAL SYMBOLS. 
SYSe 


£e=7 


TSTSHFE 


a1 


22 


23 


ra) 


8E-7 


2s 
z 
ro 


3o 
32 


USESHFT 


14 
4200) 
90600 
10700 
20644 
21746 
4160000000 ¢ 
Siveooooan « 


$160000002 
527000000) « 
10600 
; 10,700 
20664 
rani yy : 
$160000004 
$170008005 « 
10606 
0700 


5160000006 
Sirooeesas « 
i 


20660 
21760 
5160000016 
SITORQOORE « 


20644 
21744 
5160000012 
$170000083 ¢« 


11460247021 


toFNE 
FNIRG 
ass? 
wxO 
Kn 
wat 
ne 
AX? 
SAG 
Sar 
AKG 
OX? 
x6 
Any 
$A6 
Sa? 
Bx6 
Ox? 
Lae 
ANT 
Sas 
Sar 
Bx6 
ANT 
x6 
ANT 
$A6 
SA? 
AKG 
BAT 
LaA 
AKT 
$A6 
SAT 
AX6 
BXT 
Lx6 
any? 
SAG 
Sa? 
ENDRUN 
END 


ANSWER 
TSESHFT 
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ERROR DIRECTORY, 


? 


TvPE ERROK 


OCCURRED ON PAGES 


MODEL §74 ASSEMBLY 


TSS 
TSESHFT 
12 


100 
ANSWER SO 
ANSWER 
no: 

x0 

-100 
-100 
ANSWERC2 
ANSWERe 3 
xO 


20032 
ANSWER 6% 
ANSWER OS 
x0 


ANSWER C6 
ANSWER? 
x0 

no 

20-32 
20-32 
ANSWER OB 
ANSWER?9D 
x0 

xo 
160-184 
160-184 
AaNSWERO16 
ANSwtRod) 


TSTSHFY 


0.055 SECONDS 


COMPASS 3.5-4170, 


LEAST SIGNIFICANT 
LEAST SIGNIFICANT 


OA/2077A 09.00.56, 


6 RITS USED 
6 HITS USED 


LEAST SIGNIFICANT 6 BITS USED 


LEAST SIGNIFICANT 


64(OCTAL) 
64t0CTaLd 


S2tDECTHAL) @ 
S2tDECIMAL) © 


DacocTaLd 
bscocrard 


UZ(DECIHAL) © 
$2¢DECIMAL) © 


© 461DFCIMALD 
® 481(DECIMAL) 


(60-32) 
(60-82) 


“12 « 
“12 « 


JO (MF CIMALD 
BO IMNECEMALD 


(60-24) @ 
(60-24) © 


-24 ea 
-24 «a 


4S STATEMENTS 


COMPASS 3.5-470,. 


ADDRESS VALUE EACFEDS FIELD SIZE. RESULT FRUNCcATEN 


2 


3 SYMBOLS 
16 REFERENCES 


@ AITS USED 


067277716 09.00.54. 


PAGE 


ASUOCTAL DB O36CDECIMALD 
S4(0CTALDOIJOIDECIMALD 


DIIOCTAL POSTIDECTMALD 
JICOCTALDEZTIOECIMALD 


G6OtOCTALS 
GOCOCTAL) 


SS(0CTALD 
S4(0CTALS 


PAGE 


LOAD MAP = TSTSHFT CYRER LOADER 1.4-670 06727776 09.00.56. PAGE 1 ( 
( 
FWA OF THE LOAD nt a 
LWAcl OF THE LOAD 209 P 
TRANSFER ADDRESS -- TSTSHFT 125 . 
PROGRAM ENTAY POINTS -- TSTSHFT 125 ( 
( 
PROGRAM AND BLOCK ASSIGNMENTS. 
RLOCK ADDNESS LENGTH FILE DATE PHOCSSA VER LEVEL HARDWARE COMMENTS ( 
TSTSHFT an 32st 60 06727778 COMPASS 3.5 670 
SYS.RM 18) 40 SL-SYSLIB 05/16/78 COMPASS 3.5 470 PROCESS SYSTEM REQUEST, ( 
.02S CP SECONDS 192000 CH STORAGE USED 1 TABLE MOVE 
( 
md 
i 
Ww 
\o 
Dum PELATIVE OMPCDLDe 147) 
@011) 00000 00040 00000 00000 77777 717777 77400 40000 00000 00000 04000 00000 
eotts yrv7ry Vr7yTe ono000 00000 00100 On000 0000 00000 VVT7V7 VIIFT VITIVIT T7800 00000 00000 00000 04000. 
@0120 77778 ONN00 CN0N0 00000 000n4% 0000 non00 00000 27777 TIT7T TTITTT 74000 00000 00040 00000 00000 
eolzs «= T7777 T7777 774800 00000 43001 10600 10700 20644 21744 $1600 00119 46000 | 51700 On112 10600 10700 
€0130 20639 21739 51800 00119 51700 H081% 10600 10700 20668 21768 $1600 00815 51700 00816 10608 10700 
00136 20616 21714 $1600 0117 51700 00120 10800 10700 20660 21760 $1600 oot21 $1700 00122 10600 10700 
00140 20644 21744 $1600 00123 51700 00126 71602 47021. 20650 01000 00145 46000 04000 00156 0000 00000 


00844 01300 00000 00000 00000 04000 90183 n0000 00000 S100 90908 O3190 00246 54610 06000 00144 96000 


TSISHFT COMPASS 3.5-470, 06727778 09.00.54. PAGE 4 
SYMBOLIC REFERENCE TAALE>. 


ANSWER ) PROGARAN® 2703 t 2710 §$ esl6 Ss 2/22 $ 2/28 § 2734 § 2/40 §$ 
; 2709 § e715 § avails 2727 $ 2/33 § 2/39 S$ 

SySe 0 EXTERNAL © 27e2 

TSTSHFT 4 PANGRAMe 2702 € 2704 L 


Wrr NB2- CVYALIS-SNI 4LB7I/R6B 05715778 


09.00.52.N0N005K FROM 45H 
09.00.52.1P 00000320 wOHOS - FILE INPUT ¢ OC 04% 


09.00.52.D0N. PSOcO27OeTZCTORIASMILLER 
09.00.53.COMPASS. ; 
09.00.54. & WARNING MESSAGES IN TSTSHFT 


09.00.54. ASSEMBLY COMPLETE. 47300 SCH USED. 
09.00.54. 0.108 CPU SECONDS ASSEMBLY TIME. 
09,00.54.1G0. 

09.00.54,0P 00000960 WORDS - FILE OUTPUT e OC 40 
09.00.54.4S 3584 woRos ¢ 10752 MAX USED) 


OvV-7 


09.00.54.CPA 0162 SEC, 2162 ADJ. 
09.00.54.10 0634 SEC. 2634 ADI. 
09.00.54.CM 10.07] KWS,. 2663 ADJ, 
09.00.54.55 1.460 

09.00.54.PP 20737 SEC. DATE 06/27/78 


RAM WRITEIT 14/74 = OPT=1 OC FIN 4.7¢465 Q1708/79 10027443 PAGE | 
PROG 


i PROGRAM WRITELT (OUTPUT) 
CUMMON /HLUCK/ ANSWER(25) 
CALL INSTRS 
PRINT 103 
5 DO 10 121925 
Jete) 
10 PRINT 100eJeANSWER(T) 
100 FORMAT(® ANS#®12,023) 
101 FUAMAT(IHL) 


10 : ENO 
INSTHS COMPASS 3.6-476, 01/08/79 10.29.06, PAGE i 
STORAGE ALLOCATION. 

ADORESS LENGTH BINARY CONTROL CAROS. 
0. 47 IDENT INSTRS 
47 END 

bh 

- 

be BLOCKS TYPE ADDRESS LENGTH 
PROGRAM® LOCAL 0 47 
BLOCK COMMON 0 31 


ENTRY POINTS. 
INSTAS 3¢ 


INSTARS COMPASS 3.6~-476¢ 01/08/79 10629206. PAGE 2 


IDENT INSTRS 
ENTRY INSTHS 
LIsT “Bork 


a 
COMMENT SET = SHIFT © MASK = BOOLEAN © INSTRUCTION PROBLEMS 
* . 
e 
List §$ 
0 00000000000000004444 euF DATA 44448955558 266668 
1 00000000000000005555 
2 00000000000000006666 . 
. ) 
e EXAMPLE OF SET/BOOLEAN/MASK/SHIFT 
; 
3 00000000000000000000 INSTRS DATA 0 
& 6110033333 Sul 0333338 
6120355555 Su2 3555558 
S 16612 SX6 BleB2 
5160000000 C SA6 ANS 
6 6140777774 NUMBER] S84 7777748 
T6740 SxT B4 
7 ShT0000001 C SAT ANS#} 
lo 5110000002 + NUMBER2 SAI BuF +2 
b 36711 1x7 K1eX) 
i 11 5170000002 C SAT = ANS#2 
hes 
12 476211 NUMBERS CX6 XI 
5160000003 C SA6 ANS*3 
13 5110000000 » NUMBERS SAI BUF 
74710 Sx? Al+H0 
14 5170000004 C SA? ANS*4 
15 5130000000 NUMBERS SA3 BUF 
5140000001 ¢ SAS eur +) 
16 112634 BX6 X3ene 
5160000005 C SAB ANS #5 
1? 12734 NUMBER6 BXT | K34X4 
5170000006 C SAT ANS*6 
20 13634 NUMBERT BX6 X3-K4 - . 
5160000007 C SA6 ANS*? 
21 14633 NUMBERS BX6- = ~X3 
§160000010 C SA6 ANS*8 
22 20314 NUMBER9 LX3 . 12 
10733 BXT x3 
5170000011 C SAT ANS®9 


ANSTHS . COMPASS 326-4766 01/08/79 206290066 PAGE 3 
23 43606 — “NUMBERLO X66 
§160000012 C SA6 ANS#10 
24 $310c00000 ¢ , NUMBERIL SA BUF 
21103 AX] 3 
: 10611 BX6 ae 
25 §160000013 C SA6 ANS@R1 
26 21101 NUMBERI2 AX1 i 
10721 BxT xl 
5170000014 C SAT ANS@h2 
27 7110000463 NUMBERI3 SX1 4638 
6120000006 Su2 6 
30 22621 LX6 X19b2 
5160000015 C SA6 ANS#13 
31 6210777774 NUMBERI4 SHI -3 
22711 LXxT X12 
32 §170000016 C SAT ANS#L4 
33 23621 NUMBERIS AX6 X1eb2 
5160000017 C “SAG ANS®1S 
34 23711 NUMBERI16 AX? X16) 
a 5170000020 C SAT ANS*16 
Any 
w 35 6110000106 NUMBERLT SHI lose 
7110000007 Sxl | ae 
36 22711 Lx? X1eB1 
§170000021 C SAT ANS¢1T 
37? 23711 NUMBERI®8 AX7 X1sB1 
5170000022 C SAT ANS¢16 
40 43766 NUMBERI9 MX7 -6 
5170000023 C SAT ANS*19 
a 
° EXAMPLE OF INCORRECT USAGE 
@ 
41 §150000000 + NUMBER20 SAS BUF 
20560 LXx5 -12 
10755 BX7 X5 
42 5170000024 C SAT ANS*20 
43 5150000000 « NUMBER21 SAS BUF 
21566 AXS -6 
10655 BX6 x5 
44 §160000025 C SA6 ANS*2) 
45 5140000000 NUMBER22 SA4 BUF 
20442 Lx4 162 
10644 BX6 x4 


46 5160000026 C SA6 ANS*22 


V?-? 


COMPASS 366-476. 01/08/79 10029206. 
INSTRS 
EQ INSTRS 
uegrenteta ‘USE BLOCKS. 
ANS BSSZ2 25 
Pe ™ : ENO 
7 SYMBOLS 
, EO ALE STATEMENTS 25 
mceren en RepeL Fecaeesiaes 0330 SECONDS 58 REFERENCES 
STRS COMPASS 3.6-476. 01/08/79 10.29.06. 

INSTR : | 


ERRUK OLRECTORY. 


7 TYPE ERROR 


ADORESS VALUE EXCEEDS FIELD SIZE» RESULT TRUNCATED 
OCCURRED ON PAGES 3 


INSTRS COMPASS 306-476, . 01708779 10.29.06. 

SYMBOLIC REFERENCE TABLE. . 

ANS 0 BLOCK 2/20 § 2/31 § 2/43 § 2/53 § 3711 § 3/23 Ss 3/33 $ 
2/24 § 2/35 § 2/46 § 3/02 § 3/16 § 3/26 § 3/36 S$ 
2728 § 2740 § 2/49 § 3/07 § 3/20 § 9/31 S$ 3744 5 

BUF 0 PROGRAMe 2/10 L 2/33. 2/38 3/41 375) 
2/26 2/37. 3704 3/46 

INSTHS 3 PROGRAMe 2/02 £ 2/16 L 4702 

NUMBER] 6 PROGRAMe 2722 & 

NUMHEHIO -23 PROGRAMe 3/01 L 

NUMUER] 24 PROGRAM® 3/04 L 

NUMBER} 2 26 PROGRAM® 3/09 L 

NUMBER] 9 eT PROGRAMe 3/13 L 

NUMBERLS 31 PROGRAM® IIB L 

NUMBEHIS 33s PROGRAM® " 3722 

NUMBERI6 34 PROGRAM® 3/25 -b 

NUMBERIT 35 PROGRAMe® 3/24 4 

NUMBERIB a7 PROGRAMe 3/32 L 

NUMUEHI9 40 PROGRAMe 3/35 L 

NUMutR2 ya PROGRAM® 2726 

NUMBEH20 41 PROGRAMME 3/61 L 

NUMUER2) 43 PROGRAMe 3/46 L 

NUMHER22 45 PROGRANM® SIL 

NUMBER le PROGRAM® 2/30 L. 

NUMUERS4 13 PROGRAMe 2/33 & 

NUMBERS 15 PROGRAM® eva7 

NUMBEH6 17 PROGRAM® 2742 & 

NUMJERT 20 PROGRAMe 2745 

NUMBER 21 PROGRAM®e 2/46 

HUMBER * pe PROGRAMe 2/51 Lb 


PAGE 4 


PAGE $ 


PAGE 6 


3/49 § 
3/54 § 
4704 L 


LOAD HAP = WRITERT CYBER LOADER 1,4-485 OL/OB/T9 3100290200 PAGE i 
FWA OF THE LOAD an bo 

Lwael OF THE LOAD 7150 

TRANSFER ADDRESS == WRITEIT 2224 

PROGRAM ENTRY POINTS << WRITEIT 2224 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADDRESS LENGTH FILE DATE PROCSSR VER LEVEL HARDWARE COMMENTS 
/BLOCKS Mit 31 : 
WHITEIT 142 2120 LGo 01/00/79 FIN 4.7 485 666X I PROGRAM opTt=1 
INSTRS 2262 ' 47 Lco 01/08/79 COMPASS 3.6 476 SET ~ SHIFT - MASK =~ BOOLEAN ~ USI SUCEEON PROB 
/STP.ENDZ 2331. 1 
7FCL eC eS 2332 26 
4080.10./ 2360 101 
QenTRY= 246) 0 SL-FORTRAN 121/716/78 COMPASS 3.6 485 : FCL INITIALIZATION ROUTINE, 
7FCLEENTS 2461 40 : 
CuMlT0= 252) 33 SL-FORTRAN 11/726/76 COMPASS 3.6 405 COMMON CODED 1/0 ROUTINES AND CONSTANTS, 
FCL=FOL 2554 40 SL-FORTRAN 31716778 COMPASS 3.6 485 FCL CAPSULE LOADING 
FELFST= 2614 3 SL-FORTRAN 11/36/78 COMPASS 3.6 4865 CONVERTED DATA STORAGE 

i FLTOUT= 2617. 321 SL=FORTRAN 11716778 CUMPASS 3.6 405 COMMON FLOATING OUTPUT CODE 

| FORSYS= 3130 302 SL=FORTRAN 11716/78 COMPASS 3.6 485 FORTRAN OBJECT LIGRARY UTILITIES. 

be OUTCOM= 3431 154 SL-FORTRAN 21/16/78 COMPASS 3.6 405 COMMON OUTPUT CODE 

bad SYSAID= 3605 PE SL-FORTRAN 11/16/78 COMPASS 3.6 465 LINK BETWEEN SYS=AID AND INITIALIZATION CODE, 
FECHSK= 3606 41 SL-FORTRAN 11716778 COMPASS 3.6 485 INITIALIZE CONSTANTS. 
FuTaPs 3647 357 SL-FORTRAN 11/16/78 COMPASS 3.6 485 CRACK APLIST AND FORMAT FOR KODER/KRAKER. 
FORUTL= | . 4226 46 SL-FORTRAN 11/16/78 COMPASS 3.6 485 FCL MISC. UTILITIES. 
GETHITs 4274 ST SL-FORTRAN 11/16/78 CUMPASS 3.6 485 LOCATE AN FIT GIVEN A FILE NAME, 
KOVER= 4353 #51 SL-FORTRAN $1716/78 CUMPASS 3.6 485 OUTPUT FORMAT INTERPRETER. 
OuTc= 5024 150 SL-FORTRAN 11/16/76 COMPASS 3.6 465 FORMATTED WRITE FORTRAN RECORD. 
/FDL.COMS 5174 14 ; 
FOL.RES $210 | 211 SL-SYSLIB 11/02/78 CUMPASS 3.6 485 FAST DYNAMIC LOADER RESIVENT. 
FOU.MMI 5421 222 SL~SYSLIB 11/02/78 COMPASS 3.6 485 FOL MEMORY MANAGER INTERFACE. 
CPuU.SYS 5643 40 SL-SYSLIB 13/15778 CUMPASS 3.6 476 PROCESS SYSTEM HEQUEST. 
CMF ..ALF 5703 160 SL-SYSLIB 117125778 COMPASS 3.6 485 CMM Viel = ALLOCATE FIXED. 
CMF .CSF 6063 6 SL-SYSLIB 11715/78 CUMPASS 3.6 485 CHM Viel = CHANGE SPECS FIXED. 
CMM.FFA 6071 14 SL-SYSLIA 11715/78 COMPASS 3.6 4465 CHM Viel = FIXEO FREE ALGORITHM, : 
CMF FRE 6105 36 SL=-SYSLIB 81/15/76 CUMPASS 3.6 465 CMM Viel = FREE FIXED. 
Cam.R 6143 2146 SL-SYSLIB 21/15/78 COMPASS 3.6 445 CMM Viel = RESIDENT SUBROUTINES. 

; CMF .SLF 6357 22 SL-SYSLIB 11/15/78 COMPASS 3.6 485 CMM Viel = SHRINK AT LWA FIXED. 
a CILSKM 6402 433 SL~-SYSLI8 11716/768 COMPASS 3.6 465 CRM CONTROLLING HOUTINE. 

ERHSRM 7034 25 SL=-SYSLIB 11/16/78 COMPASS 3.6 485 CAM ERRUR PROCESSOR ENTRY. 
LISTSRH 706) . 67 SL-SYSLIB 11/16/78 COMPASS 3.6 465 CRM = ALLOCATE SPACE FOR LAST OF FILES 


0335 CP SECONDS . 236008 CM STORAGE USED 12 TABLE MOVES 


ANS* 0 TITITTITTT7ITIITTALLLLO 
ANS® 1 TITTTTTTTTT TTI TI 74 
ANSe 2 00000000000000015554 
ANS*e 3 00000000000000000010 
ANSe 4 00000000000000002262 
, ANS? § 00000000000000004444 
ANS* 6 00000000000000005555 
ANS¢ 7 00000000000000001111 
ANSe 8 77777777777777773333 
ANS* 9 00000000000044440000 


ANS*10 77000000000000000000 
ANS) 2 00000000000000000444 
ANSo12 00000000000000000222 
ANS¢13 00000000000000046300 
ANS¢14 00000000000000000046 
ANS¢}5 00000000000000000004 
ANS #16 00000000000000004630 
ANSo17 00000000000000000700 
ANS¢16 0000000000000V0000000 
ANS¢19 TITITTATIVITTIII77700 
ANS*20 44440000000000000000 
ANS+21 00000000000000000000 
ANS¢22 000011)1000000000000 
ANSe23 00000000000000000000 
ANS*24 00000000000000000000 


97-7 


: MFS NH}- CYBT4-SN108 SC/ROO VAT YAL| 
10.27¢37.D00N00K4 FROM 70H 
10e27e3T7.IP 00000448 WORDS - FILE INPUT » OC 04 
10.27.37.00N0TS.  001A2688301896sMILLER 
10.27.43. REWIND OUTPUT. 


10027.43+F TNeR=06 
10.29.07, 1 WARNING MESSAGE IN  INSTRS 

10.29.07. 2616 CP SECONDS COHPILATION TIME 
10.29.07.MAPyPART. 

10.29.07.160. 
10.29624. END WRITEIT . 
10.29.24. 2090 CP SECONDS EXECUTION TIME 
10.29.24.0P 00001856 WORDS = FILE OUTPUT » DC 40 
10.24.24.4S 3584 WORDS ( 17920 MAX USED) 
10629+24.CPA 2957 SEC. 957 ADJe 
10.29.24.CPB 0220 SEC. 6220 ADJ. 
10629624410 16170 SEC. 1.170 AVJs 
"10.29.24.CN 400762 KWS. 2.487 ADUe 
10.29.24.SS 4.836 


10629.24.PP 8.565 SEC. DATE 01708/79 
10629.24.EN END OF JOU. OH . 


LESSON GUIDE 5 
CYBER CP COMPASS 
FLOATING POINT ARITHMETIC 


LESSON PREVIEW: 


THIS LESSON EXAMINES THE FLOATING POINT NUMBER FORMAT ~ 
AND HARDWARE INSTRUCTIONS THAT MANIPULATE THEM, SIN- 
GLE AND DOUBLE PRECISION ARITHMETIC AND THE INSTRUC- 
TIONS TO CONVERT BETWEEN INTEGER AND FLOATING POINT 
NUMBERS ARE ALSO INCLUDED, 


OPRJECTIVES: 


di 


PERFORM ARITHMETIC OPERATION USING THE FXI AND 
RXI INSTRUCTIONS, 


RECOGNIZE SPECIAL EXPONENTS AND THEIR EFFECT ON 
THE PROGRAM, 

3, Be AWARE OF DOUBLE PRECISION NUMBERS AND DOUBLE 
PRECISION OPERATIONS, 

. WRITE PROGRAMS USING FLOATING POINT NUMBERS, 

5, Be ABLE TO CONVERT INTEGERS TO AND FROM FLOATING 
POINT BOTH MANUALLY AND USING PACK AND NORMALIZE 
INSTRUCTIONS, 

LEARNING TASKS: 

. ATTEND THE LECTURE, 
. ANSWER QuesTIons (Exercises 1, 2, AND 3) THROUGH- 
OUT THE LESSON, | 
3, WRITE AND DEBUG PROGRAM No, 10 or 11 FROM StTuDENT 
PROBLEMS, 
4, Reap COMPASS Stupent Hanpout LESSON GUIDE 6 AND 


COMPASS Reference MANUAL, CHAPTER 8, PAGES 34 
THROUGH 44, 


POSITIVE 
COEFFICIENTS 


POSITIVE 
COEFFICIENTS 


RANGE OF EXPONENTS 


NEGATIVE 
EXPONENTS 


NEGATIVE 
EXPONENTS 


eee re me ae ee ee te ee ee ee ee ae cee ee ee ee ae ee ee 


POSITIVE 
EXPONENTS 


POSTIVE 
EXPONENTS 


1717 


2014 


5763 


6060 


“= NUMBERS WITH COMPONENTS WITHIN THESE RANGES MAY BE 
CONVERTED TO INTEGERS WITHOUT LOSING THEIR VALUES, 


| 


FLOATING Portnt ARITHMETIC 
BASIC Instruction SET 


THE FOLLOWING INSTRUCTIONS ARE RELEVANT TO WORKING 
WITH FLOATING POINT NUMBERS: 


PACK PX2 X1,B1 
NORMALIZE NX3 ss X2,,B2 
RouNDED NorMALIZE ZX3— X2.,,B2 
UNPACK UX4  —- X3,,B3 
Lert Suet SLX) XU,BB 
~ UNROUNDED ARITHMETIC. -FX3.——X14X2 
FX3 X1-X2 

FX3 X1*X2 

FX3 X1/X2 

ROUNDED ARITHMETIC RX3 X1+X2 
| RX3.X1-X2 

RX3 X1*X2 

RX3 X1/X2 

DouBLe PRECISION DX3 X1+X2 
ARITHMETIC DY x1-X2 
DX3 X1*X2 


DATA FORMAT 
PACKING IS THE PROCESS BY WHICH AN INTEGER NUMBER IS 


CONVERTED TO A FLOATING POINT NUMBER (1,.£,, A NUMBER 
WITH A COEFFICIENT AND EXPONENT), 


ASSUME THAT A PROGRAMMER WOULD LIKE TO CONVERT THE 
INTEGER NUMBER 1 TO THE FLOATING POINT 1.0 or 1*2°, 
WE NEED THE FOLLOWING INSTRUCTIONS: 


(COEFFICIENT) © 
SX1l 1 (X1)=0000 0000 0000 0000 0001 
SBl 0 (B1)=000000 (EXPONENT) 


PX2 X1,Bl (X2)=2000 0000 0000 0000 000 1 
X2 CONTAINS THREE LOGICAL UNITS: | 

A sIcn BIT: BIT 59. 

AN EXPONENT, BIASED By 2000: Bits 58 To 48 


A COEFFICIENT: BITS 47 To 0 


_ SIGN EXPONENT COEFFICIENT 
BIT 


59 U7 ix: 0 
OCTAL: 2000 0000 0000 0000 0001 


THE HARDWARE WILL BIAS ALL EXPONENTS BY 2000B, 
THEREFORE: 


1*29=2000 0000 0000 0000 0001 
1*2432001 0000 0000 0000 0001 
1*2°=2005 0000 0000 0000 0001 


5-4 


| * igh 4h 


=e my 


Ay 


4 


FLOATING PoINT ARITHMETIC 
Pack 


THE IMPORTANCE OF THE BIAS BECOMES EVIDENT WHEN IT IS 
NECESSARY TO DEAL WITH NEGATIVE EXPONENTS, FOR EXAMPLE: 


1*27-9=1777 0000 0000 0000 0001 
1*2°*=1776 0000 0000 0000 0001" 
1*27°=1772 0000 0000 0000 0001 

THE INSTRUCTIONS NECESSARY FOR PRODUCING 1*27> ARE: 
Sxl ] (X1)=0000 0000 0000 0000 0001 
SBl -5 (B1)=777772 
PX2  X1,Bl  (X2)=1772 0000 0000 0000 0001 


WITH THE ABOVE EXAMPLES, THE PACK INSTRUCTION PERFORMED 
THE FOLLOWING OPERATIONS, 


l. IT TRANSFERRED THE Lowest 48 Bits oF X1 To X2 To 
FORM THE COEFFICIENT. THE UPPER 12 BITS oF XI, 
EXCEPT FOR THE SIGN BIT, ARE NOT USED, . 


2, IT TRANSFERRED THE LOWEST 1] Bits oF Bl To BITS 
48 to 58 oF X2 To FORM THE EXPONENT. THE RE- 
_MAINING BITS OF Bl ARE IGNORED. 


3, Brt 58° 1N X2 wAS TOGGLED. THIS EFFECTIVELY 
BIASED THE EXPONENT BY 2000 OcTAL, 


4, THE SIGN OF X1 WAS TRANSFERRED FROM XI, 


5. IF THE SIGN OF X1 HAD BEEN NEGATIVE. THE 11-BIT 
EXPONENT WOULD HAVE BEEN COMPLEMENTED (SEE STEP 
2). 


THE SAME PROCEDURE THUS WORKS FOR NEGATIVE NUMBERS, 
FOR EXAMPLE: 
Sxl -] (X1)=7777 7777 7777 «7777 7776 
SBl 2 (B1)=000002 
PX2  X1.Bl = (X2)=5775 7777 7777 7777 7776 
SX1_ -l (X1)=7777 7777 7777 7777 7776 
SBl -2 (B1)=777775 
PX2  X1.Bl (X2)=6002 7777 7777 7777 7776 


IT BECOMES APPARENT THAT THERE ARE SOME LIMITS TO THE 
SIZE OF AN EXPONENT AND COEFFICIENT, 


THE COEFFICIENT IS ORDINARILY LIMITED To 48 BITS OF 
SIGNIFICANCE, (LATER WE WILL SEE HOW DOUBLE PRECI- 
SION GIVES 96 BITS OF SIGNIFICANCE, ) 


THE EXPONENT REACHES ITS UPPER LIMITS FOR A POSITIVE 
NUMBER AT 3776, WHEN A NUMBER HAS AN EXPONENT OF 
3777 or N*2 IT HAS OVERFLOWED THE MACHINE, SUCH 


A NUMBER IS IDENTIFIED AS INFINITE OR OUT OF RANGE, 
THUS THE FOLLOWING NUMBER WOULD BE INFINITE: 


3777 0000 0000 0000 0001 


On A 7000 Type macHINe (CYBER 76), AN ERROR WOULD BE 
IMMEDIATELY NOTED AND THE USER WOULD USUALLY ABORT 
AT THIS POINT. ON A 6000 mMaCHINE (Lower CYBER), THE 
PROGRAM WOULD USUALLY ABORT WHEN IT ATTEMPTED TO USE 
THIS NUMBER IN A FLOATING POINT OPERATION, 


777 
A NEGATIVE NUMBER ALSO HAS AN UPPER LIMIT. IF 1*2? 


een 777 
IS INFINITE, So 1s -1*27777,) Tuat NUMBER WOULD BE 
REPRESENTED AS: 


4000 7777 7777 7777 7776 
Tus, 3777 anp 4000 ARE EXPONENTS THAT ARE INFINITE, 


IT IS PERMISSIBLE TO HAVE EXPONENTS REPRESENTING N*2-°, 
THESE EXPONENTS ARE 1777 FoR POSITIVE NUMBERS, 6000 
FOR NEGATIVE NUMBERS, THESE NUMBERS ARE IDENTIFIED 

AS INDEFINITE ON A 6000 MACHINE AND OUT OF RANGE ON 

A /000, ANY USE OF THESE NUMBERS PRODUCES AN ERROR 
AND USUALLY AN ABORT, 


a: = 


. it 2 am 
h a Zn } t, i 
’ ? by 


UNDERFLOW IS REPRESENTED BY EXPONENTS OF 0000 For 
POSITIVE NUMBERS AND 7777 FOR NEGATIVE NUMBERS, No 
ERROR CONDITION IS PRODUCED ON A 6000 macHine: a 7000 
WILL PRODUCE AN ERROR CONDITION WHEN UNDERFLOW OCCURS, 
AN ATTEMPT TO USE A NUMBER WITH AN EXPONENT oF 0000 

orn 7777 WILL NOT PRODUCE AN ERROR ON A 6000, HoweVER 
THE RESULT OF ANY OPERATION USING THE NUMBER WILL ALSO 
HAVE AN EXPONENT OF 0000 or 7777, Tuus, IF: 


(X1)=0000 5555 5555 5555 5555 
(X2)=2000 1111 1111 1111 1111 
FX3  X1+X2 propuces (X3)=0000 0000 0000 0000 0000 


THE PROGRAMMER IS RESPONSIBLE FOR DEVELOPING HIS OWN 
TEST FOR UNDERFLOW, 


FLOATING PoINT ARITHMETIC 
Exercises - Special ExPoNeNTSs 


Exercise ] 


DIRECTIONS: FILL IN THE MISSING ITEMS ON THIS CHART 
(REFER TO CHART AT BOTTOM OF PAGE FOR RANGES), 


Upper 12 Bits Exponents (+ on -) CoeFFIcrENT (+ oR -) 


7777 UNDERFLOW NEGATIVE 
7776 NEGATIVE NEGATIVE 
6001 = 

INDEFINITE NEGATIVE 
5777 POSITIVE | 
4001 | 
4000 

INFINITE 
3776 
2000 , 

INDEFINITE 
1776 
0000 

1777 ~—. 2000 
(-,+) (+,+) 


0000 3777 (ine) 
7177 4000 G 


(=32) (+,-) 
6000 5777 


RANGE OF FLOATING 
5-8- 


Pornt NumBEeRS 


| | 
| 
8 
a 
| 
| 


1 5 a = ‘3 _ ? 7 
: . oi f a 
4 : ) e if 
r og 
' , ; a : 
: , 


Biti.| CZ 


PACKING: PX1  Bu,Xk 


BJ | 
I7 109 0 59 58 0 


XI | | 
59 #58 : 7 : | 
a 
| ( ) BINARY. 
EXPONENT SIGN. (BIAS POINT 


COEFFICIENT | COEFFICIENT 
SIGN 


HOW TO PACK A FLOATING POINT NUMBER: 


a 


(X1) 


00000000000000000004 
PX2 ~—s- X11, Bo 
(x2) 


-20000000000000000004. 
ee | anaes 


/ 
EXP \gaken FROM 
BIASED LoweR 48 BITS 
oF Xl COEFFICIENT 


0000 <——10-BItT exp 


TAKEN FROM BO 
010 


+ 2000. 
2000. 
a 


fe 
010 000 000 000 


(BINARY) 
SIGN OF EXP, 


BIAS A POSITIVE EXPONENT BY ADDING 2000g TO THE TRUE 
EXPONENT. 


THIS SETS THE EXPONENT SIGN BIT TO A 1 AND REPRESENTS 
THE TRUE EXPONENT IN THE REMAINING 10 BITS, 


5-10 


a 
| 
| 
| 
B 
B 


HOW TO NORMALIZE A PACKED NUMBER 
(x2) = 20000000000000000004 
We 0,89 


(X3) = 17224000000000000000. (B2) = 0000559 


"4 
ADJUSTED COEFFICIENT IS SHIFTED 
EXPONENT LEFT UNTIL ITS MOST 


SIGNIFICANT ONE BIT 
IS IN BIT Pos, 47 


1777 BIAS MAKES EXP. SIGN BIT QO AND 
8 
COMPLIMENTS EXP, a8 
-559 : EXP, (NO. OF BITS SHIFTED LEFT) 
1722. 


S01 111 olo olo <— (Binary) 
SIGN ~10-BIT 


OF COMPLEMENTED 
~ EXPONENT EXPONENT 


THE TRUE VALUE OF THE NUMBER IS: 
4000000000000000 X 2 7228 
BIAS A NEGATIVE EXPONENT BY SUBTRACTING IT FROM 17779. 


THIS MAKES THE EXPONENT SIGN BIT A O AND REPRESENTS 
_ THE TRUE EXPONENT IN COMPLEMENTED FORM, 


, rite 

== PACK THE NUMBER AS THOUGH IT WERE POSITIVE --- 
THEN COMPLEMENT THE ENTIRE WORD <= 

EXAMPLE: 

(X3) = -U 

PACK IT: 
(X3) = 20000000000000000004, 

NoRMALIZE IT: LOGICALLY 

_ THIS IS THE 

(X3) = 17224000000000000000. OPERATION 


ACCOMPLISHED 
COMPLEMENT IT: 


(X3) =. 60553777777777777117 


THE BINARY EXPONENT FIELD IS: - 


6 0 5 5 
SIGN llo o00 lol lol 
OF 
COEF. SIGN 10-B1T 


OF EXP, EXPONENT 


THE COEFFICIENT TS COMPLEMENTED: 


3777717777777777 (48 Bits) 


as : 7 i 7 1. } { ¥ bs 


EXAMPLES OF PACKED AND NORMALIZED NUMBERS _ 


NOTE: ALL NUMBERS ARE OCTAL 


Og = 40g x 2° 


20000900000000000040 
17254000000000000000. 


= ) -L1g: 
0049 = 4e x 2 8 


17660000000000000004, 


17114000000000000000¢ - 


“40g = -40. x 20 


20000000000000000040,° 


17254000000000000000. 


60523777777777777177. 
=,0049 = -4g x 2 “Hg 


17660000000000000004, 
17114000000000000000. 
60663777777777777777¢ 


e -3 
1.4g = 1g x 2 


17740000000000000014 
17206000000000000000. 


-1,4g = -lp x 2-3 
- 17740000000000000014, 


17206000000000000000. 
60571777777777777777 


5-13. 


PACK IT 
NORM. IT 


PACK IT 
NORM, IT 


PACK IT 
_ NORM. IT 


COMPLEMENT IT 


PACK IT 
NORM, IT. 


COMPLEMENT IT 


PACK IT 
NORM. IT 


PACK IT 


NORM. IT 
COMPLEMENT IT 


NORMALIZATION - TWO INSTRUCTIONS WILL PRODUCE | 
: NORMALIZATION: 


NX3. X2,B2 
2X3 X2,B2 


NOTE 


THe ZX3 INSTRUCTION ALSO ROUNDS, AS WILL BE 
DISCUSSED LATER, 


NORMALIZING IS THE PROCESS BY WHICH THE HARDWARE LEFT 
SHIFTS A COEFFICIENT UNTIL THE MOST SIGNIFICANT BIT IS 
AT BIT POSITION 47 (1,£,, UNTIL THE SIGN BIT AND BIT 
47 ARE DIFFERENT). AS THE HARDWARE SHIFTS, THE EXPO- 
NENT IS DECREMENTED ACCORDINGLY. THE ORIGINAL AND 
NORMALIZED VALUE ARE THE SAME BUT THEIR INTERNAL REP- 
RESENTATION DIFFERS: THAT IS, THEY HAVE DIFFERENT 
COEFFICIENTS AND EXPONENTS, 


THESE ARE ALL WAYS OF REPRESENTING THE SAME VALUE: 
1 * 2% or 2000 0000 0000 0000 0001 
> ee yl or 1776 0000 0000 0000 0002 
4 * 2 op 1775 0000 0000 0000 0004 
108 * 23 or 1774 0000 0000 0000 0010 


4000 0000 0000 0000 * 2747 or 1720 4000 0000 0000 0000 
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; 0 ] ' ; rg oe es | 
= 1 oe ‘a e ‘ 7 : 


THIS LAST VALUE IS THE QUANTITY i PACKED AND NORMAL- 
IZED, THESE INSTRUCTIONS WOULD ACCOMPLISH THIS: 


SX1 1 (X1) 0000 0000 0000 0000 0001 


PX2 Xl. BO (X2) 


2000 0000 0900 0000 0001 


NX3 X2,B1*  (X3) = 1720 4000 0000 0000 0000 


(B1) 000057 


As THE MOST SIGNIFICANT BIT 1S SHIFTED LEFT, THE SIGN 
BIT IS EXTENDED END-AROUND, THUS, WHILE THE NORMAL- 
IZED VALUE OF 1 Is: 

1720 4000 0000 0000 0000 


- THE NORMALIZED VALUE OF -1 Is: 


6057 3777 7777 7777 7777 


IF THE B REGISTER IS SPECIFIED, IT CONTAINS THE NUM- 
BER OF POSITIONS THE COEFFICIENT WAS SHIFTED BEFORE 
IT NORMALIZED, 
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To CONVERT A FLOATING POINT NUMBER TO AN INTEGER, THE 
PROGRAMMER MUST UNPACK THE FLOATING POINT NUMBER -AND 
LEFT SHIFT THE RESULT. 


For EXAMPLE, ASSUME THAT A PROGRAMMER WANTS TO CONVERT 
THE NUMBER 5,0 (1N X3) To THE INTEGER 5 (1N X1), ThE 
PROCEDURE IS AS FOLLOWS. 


UX2  B2,X3 
LX1 = X2,E2 


THE UNPACK INSTRUCTION TRANSFERRED THE LOWER 48 BITS 
oF X3 To X2 AND EXTENDED THE SIGN BIT IN THE UPPER 12 
BITS: 


(X3) = 1722 5000 0000 0000 0000 
(X2) = 0000 5000 0000: 0000 0900 


Bits 48 tHrouGH 57 oF X3 ARE TRANSFERRED TO THE LOWER 
10 BITs oF THE B ReGisTeR. Brit 58 1S TOGGLED AND THEN 
USED TO FILL IN THE REST OF THE B REGISTER BITS, 


(B2) = 777722'.(-55) 


_ THE LEFT SHIFT PRODUCES AN EFFECTIVE ARITHMETIC RIGHT 
SHIFT WITH SIGN EXTENSION OF 55 ocTaL or 45 DECIMAL 
PLACES, 


(X1) = 0000 0000 0000 0000 0005 


A NEGATIVE NUMBER WOULD BE TREATED SIMILARLY BUT THE 
EXPONENT WOULD BE COMPLEMENTED FIRST. FOR EXAMPLE, 
THE COMPLEMENT OF 5.0 SEEN ABOVE WOULD BE: 


(X3) = 6055 2777 7777 7777 7777: ~(-5,0) 
UX2 B2.X3 WOULD PRODUCE: 

(X2) = 7777 2777 7777 «7777 «7777 

(B2) = 777722 


LX1 X2.,B2 woutp PRODUCE: 
(X1) = 7777 7777 7777 7777 :7772—=«~(-5) 


1 - ; ; 
|| || ; 2 
: 3 


$ i y j j : ] Be b = } 


UNPACKING: UXr  Bu.Xk 


| XK 
59 58 57 48 47 | 0 


eV 
EXPONENT | 


PACKED QUANTITY 


S16n (Bras) 


COEFFICIENT . COEFFICIENT 
SIGN 
seen SED 
EXPONENT 
10 9 0 | 48 47 0 

7 
wa WE — 
an ae | 


(BIT TOGGLED & ~ (S16n ExtTenpep) 


S1GN EXTENDED) 


UNPACKED QUANTITY 


To_UNNORMALIZE IT: 


17224000000000000000, 


UX4 X3,B4 
= 00004090000000000000. 
SIGN OF COEF. FROM 
COEF, LoweR 48 
EXTENDED ~° __ BITS OF X3 
111122g = 5g = Ha 


(THERE IS NO UNNORMALIZE INSTRUC 


— TION) 
LX7 X4, BY 
00000000000000000004. 


THE COEF; WAS SHIFTED 
RIGHT 959 (4510) BITS | 


DUE TO THE -55 In B4 


| 


2 ¥ s ; 7 k 
1 7 7 f i a 3 A 
‘ q u J i j 
J all ; : 


ARITHMETIC 


THE FLOATING POINT FUNCTIONS ARE: 


FX3 X1+X2 
FX3 X1-X2 
FX3 X1*X1 
FX3 X1/X2 


FLOATING POINT ARITHMETIC TAKES PLACE IN A 96-BIT 


_ ACCUMULATOR, EACH FUNCTION HAS ITS OWN PROCEDURE, 


THE PROCESS BY WHICH THE HARDWARE ADDS WILL GENERAL- 
LY ILLUSTRATE HOW OTHER FUNCTIONS WORK, 


ASSUME THAT WE WANT TO ADD 4.0 ann 1,0, 


0 1720 4000 0000 0000 0000 


4,0 


1722 4000 0000 0000 0000 


To ADD THESE TWO NUMBERS THE HARDWARE PERFORMS THE 
FOLLOWING PROCEDURES: 


1, BoTH ARGUMENTS ARE UNPACKED, 
2. THE ARGUMENT WITH THE SMALLER EXPONENET Is 
PLACED IN THE 96-BIT ACCUMULATOR AND SHIFTED 


RIGHT BY THE DIFFERENCE IN EXPONENTS, 
THUs: 

1720 4000 0000 0000 0000 
BECOMES: 


1000 0000 0000 0000 0000 0000 0000 oc00 
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3, 


THE COEFFICIENT WITH THE LARGER EXPONENT 
IS ENTERED INTO THE UPPER HALF oF THE -° 
ACCUMULATOR, 

Tuus: | 

1000 0000 0000 o000 0000 0000 0000 ogn0 
BECOMES: 


5000 0000 0000 0000 000 0000 0000 0000 


IF OVERFLOW OCCURS THE SUM IS RIGHT SHIFTED 


ONE PLACE AND THE EXPONENT IS INCREASED BY 
ONE, 


THE UPPER 48 Bits OF THE ACCUMULATOR PLUS 
THE EXPONENT ARE RETURNED TO THE RESULT X 


REGISTER, THE RESULT Js: 


1722 5000 0000 0000 0000 


s q " 7 B : | a. 


: H fs ; q . ‘ z : 
q q j q 
F j E j E . ; 
. 


ROUND FUNCTION 


THE ROUNDING FUNCTIONS ARE: 


RX3.X14X2 
RX3.X1*X2 
RX3.X1-X2 


RX3 X1/X2 


THE ROUND FUNCTION IS IDENTICAL TO THE STANDARD FLOAT- 
ING POINT FUNCTION EXCEPT THAT A BIT IS ADDED TO THE 

_ RESULT IN THE LEAST SIGNIFICANT POSITION, THIS BIT 
ADDITION REDUCES ERROR WHEN NUMBERS ARE OPERATED ON 
SEVERAL TIMES. 


THE FOLLOWING PROGRAM MULTIPLIES THE NUMBER 1,55533 
BY ITSELF A THOUSAND TIMES, USING BOTH THE STANDARD 
F FUNCTION AND THE R FUNCTION: 


IDENT = MULT 
a ENTRY START 
RESULTS BSSZ 2 : 


NUM DATA 1.55533 
START SAl NUM 
SX6 1 
PX6 X6 
NX6 X6 
BX7 X6 
SB1 1 
| SB2 1000 
LOOP FX6 X6*X1 
RX7 X7*X1 
SB1 Bl+1 
NE B1,B2,LO0P 


SAB RESULTS 
SA7 RESULTS+1 


END START 
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AFTER 1000 MULTIPLICATIONS, THE RESULTS OF THE FUNC- 
TIONS ARE: 


FX6 = (X6) 3115 5774 6776 0716 4533 


~ RXZ(X7) =) 3115 5774 6776 0716 5265 


J “ 4 : Pal | | am. . 
. ¥ i ae 


DOUBLE PRECISION FUNCTIONS 


THE DOUBLE PRECISION FUNCTIONS ARE: 


DX4 X14X2 
DX4  X1+X2 
DX4  X1*X2 


WHEN DOUBLE PRECISION FUNCTIONS ARE PERFORMED, THE 
HARDWARE RETURNS TO THE RESULT X REGISTER THE LOWER 
48 BITS OF THE ACCUMULATOR PLUS THE EXPONENT, 


To OBTAIN BOTH THE UPPER 48 BITS AND THE LOWER 48 BITS 
OF THE 96 BIT ACCUMULATOR, THE PROGRAMMER MUST PERFORM 
TWO OPERATIONS: 


FX3 X1+X2  (X3 WILL RECEIVE THE MOST SIGNIFI- 
CANT BITS - UPPER 48 BITS.) 


DX4 X1+X2 (X4 WILL RECEIVE THE LEAST SIGNIFI- 
| CANT BITS - LOWER 48 BITS.) 


FOR EXAMPLE, IF A PROGRAMMER ADDS 1.0 IN X1 AND 4,0 
IN X2 AND WANTS TO OBTAIN THE MOST AND LEAST SIGNIFI- 
CANT BITS, HE MUST PERFORM THESE OPERATIONS, 
FX3 X1+X2  (X3) = 1722 5000 0000 0000 0000 
DX4 X1+X2 (X4) = 1642 0000 0000 0000 0000 
NOTE 


THE EXPONENT IN X4 15 OFFSET BY 60B, 


TOENT 
ENTRY 


SAMPLE 


rLoPp 


CONPASS 325-4870, 


EXAMPLE CONDE FOR PROBLEM 


SA} 
$A2 
SA)? 
re 
FKS 
xB 
Fx? 
FKO 
fxr 
FR 
SA? 
JP 
DATA 
OATA 
OATA 
Oss 
END 


A 

a 

c 
nbeon2 
nAsnd 
nient 
nZOn2 
NOOK 
NOOK? 
xSene 
ANSWER 
e 

3.0 
4-0 
2-0 

i 
Flop 


MODEL 174 ASSEROLY 


Sttoo 00003 03810 00055 
00000 00200 99000 0000) 
00000 00000 90000 00822 


tr2i 


tr22 
tr2) 
0000 
5110 
0000 
i726 


6000 
£000 
4000 
v000 
0001 
0000 
5120 


24 STATEMENTS 
8.027 SECONDS 


0000 
0000 
0u00 
{651 
0000 
co00 


LOAD OPERAND 
LOAD OPERAND 
LOAD OPERAND 


FLOATING POINT ANSWER 


FLOATING POINT DATA 
FLOATING POINT DATA 
FLOATING POINT DATA 


0000 0000 Ctnite 
0000 0000 Cin2be 
6000 0000 Cladie 
0000 0000 Cinste 
2000 oF CinSbe 
0000 0000 Cinsde 
0000 0000 CtAtoe 


HHP ERTL UPD 


51300 antzo w4lZ2 4456) 
O200n NANGO Ainnw, 46000 


SAMPLE 
e 
e 
e 
e 
@ 
@ Seryeseeves » FLOP 
Sp20000006 © 
Q Sarecesesr « 
yeai2 
: 44643 
2 060i 
aerz2 
3026) 
30707 
3. 4407S? 
SiTecceele « 
& 6200000000 
S$ ?2t6000000000000008 A 
& 172274¢00000000000000 e 
Y 17284000000000080008 ¢c 
te a ANSWER 
a8 
473008 SCH STORAGE USED 
rb 
nN Owen. 
A 
P 000008 Aad 000700 Ro 000000 
ne 201600 Al 000116 fi O0000I CtAipe 
FL 000200 Az ooonlFr 2 00002 Cta2te 
€4 700700 a3 000120 6) 012733 CtAsbe 
NE 000045 AS Q00N0E 64 000701 Ctaate 
FE 000000 AS coorth m5 coonnt CtaSpe 
Ha 000600 as 000008 fh 000200 Ctaope 
at 000128 WF 027756 CUATbe 
ne 64723 $400 0000 0000 9000 
mt 2723 6000 0000 0000 9000 
m2 3722 4000 O00 0000 0000 
nd 9720 4000 0009 O00 0090 
me) 6U?Z72)0«©7600@ «0000 «0000 «60000 
mS 27271 %H00 0000 0000 0000 
NO 9723 4400 0000 0000 0000 
ny 2726 $720 0000 Ov0e 0000 
00000 00000 00000 00000 90000 
000$% #56130 03230 0005% 54710 
00060 15058 52000 on000 00061 
00064 teerh Teoee eco0e 00000 
00070 14e7l 95755 00000 00000 
00100 $4000 00000 04000 00001 
Duep RELATIVE 
oornl Siton ont St2n0 00107 
onthe aos? Stina antet “e000 


Se ee ee ee oe 


§ SYNHOLS 
fle REFEREnces 


0000 
0n00 


s1i0 


64550 02550 00000 446000 
07046 00060 51600 00003 
40000 00000 02000 oottt 


A6727/738 09,018.04, 


651 


40618 40722 3006) JoTO? 
17216 N00NO N0CND 00000 


ne Oe ee a ee” Oe 


paat 2 
“@ 
0000 0000 
6000 0000 
2000 oF 


00000 00068 00008 00000 
04000 00063 00000 ono2t 
00000 00000 40000 60000 


“$7226 90000 00000 Of 


COMPASS 23.5-478, 04727716 09.01.03, PAGE 
SanPr€ 
S1anacr ALLOCATION, 
ACOAESS LENGIN HIVARY CONTROL CahOs. 
0 at IOFNT § SaHPLe 
at 2 enn fcoP 
ENTAY POENTS, 
rLoP ae | 
NAD HAP - SAHPLE CYAFA LOANER 1.4-470 04/27770 69,031.04. PAGE ‘ 
ua OF THE £020 iat 
pact OF Ter tan 122 
TRANSFER ADNAESS -- FLOP on 
PAOGRPAM FIAy POINTS -- SAHPLE phe 
PROGRAM AND ALOCK ASSIGNMENTS. 
in! ALOCK ADDHESS = LENGTI FILE pate PHOCSSA VER LEVEL NARNWARE COHHENTS : 
: wm é 
| ie Samece bs i 6a 06721770 COMPASS 3.5 470 
OV 
2010 CP SECONDS 132008 CH STNRAGE USFN § TABLE MOVE 


utr NH2- CvAiIS-SN) 4LulsRou 05715778 


09.0).02.00N005« FON 4Sn 
09,08.02.)F 00000320 WONDS - FILE INPUT 6 OC 04 
09.01.02.00N. PSOeO2TAo P2ECTORLAMIILER 


09.01.03). COMPASS. 

09.03.04, ASSEMULY COMPLETE. 473008 SCH USEO. 

09.01.04, 0.079 CPU SECONDS ASSfHOLY TIME, , 
09.01.04,160, 

09.08.04. FARNOR HONE «00. ANNKHESS »000000 

O9.O1. OS. KET. 

09.01.04, 0HP URED DDT) 

09.01.04,0P 00000A96 wOHDS - FILE OQUIPUT »« OC 40 


09.01.04.nS 34666 wORUS ¢ 7168 Hak USED) 
09,01.04,CPA ot2t SEC, 042) ADD, 
09.0).04.10 A222 SEC. one e622 AQow, 
09.01.04,0n 9.539 HWSe e3Ah2 AND, A 
09.01.04,45 3.225 

? 09.01.04.eP 2.96) SEC. DATE 06721778 


QaQ.anlb.ns 6a Fen nF inh. Co 


fNcNVAT 


STORAGE ALLOCATION. 
ADDRESS = LENGTH 
r) 2 
2 
INcNVAT 
0 71900123456 
27900 
: 24ait 
_§ 26322 
22423 
uo 
! 0200000000 
N 2 
ron} 
47306 SCH 
“OMrn, 
P 900000 AO 000200 fo H00n00 
RA 220200 Al Qo00r8 Bi 000040 
L 000200 a2 o000f0 2 ThrTy? 
€" 1700700 43 000057 Ad O127)93 
RE 0000455 A& O000NI fe 100201 
FE 00000 a5 OOOrtE 85 Onortt 
*e 000600 46 000001 4 000200 
— AT COONAL AF 27756 
nO ©@€000 0800 9000 0012 1454° 
Ph 2000 0000 0709 0012 3454 
n2 > 3737 S162 7009 0000 o0n0 
nd GCCON S162 FONG Bono 0000 
me 0000 0000 0000 0012 3454 
XS 6000 ©0000 0004 0040 o00n 
*% 31505 1520 0009 oO000 0061 
XP 0000 0000 0009 0000 0000 
00000 00000 GOn0e Ge0n0 00000 
90054 #56130 03110 On05% 54710 
00060 15051 $2000 vo000 0006) 
00064 $4071 TFonn0 ono0n 00000 
00070 14073 75755 oonnn OOn00 
00100 #54000 onnoo olono erent 


BINARY CONTHOL CARDS. 


IDEN 
ENN 


ENTAY POINTS. 


INCNVRI 


IDE 
EN 
Lis 


1 NCNVRT 
INCNVRT 


NO 
Ry 
' 


INCNVRY 
INCNVAT 
t 


COMPASS 3.5-470, 


TRANSFER ADDHESS 


067297778 h.19.9h. PAGE i) 


COMPASS 3.5-4070, 047279778 16.99.MKe Pade 2 


CONVERSION OF INTEGER NUMAFA TO FLOATING POINT 
NUMBER AND WACK 10 INTEGER 


INCNVRE San 


Pat 
WA? 
Un 
Las 


Je 
FNNn 


STORAGE USED 
MODEL 174 ASSEMALY 


CtAlps 
CUA2ie 
Cta})s 
Claes 
Ctaspe 
Clabes 
CtaT)s 


no00 
1505 
0000 
0000 
7E90 
6000 
nano 


0000 
1520 
0000 
ooan 
1236 
voon 
onan 


1274546A 
nO 
at.6i 
H2eR2 
whe 


" 
INCNVRT 


0000 
0000 
ovno 
onn0 
5021 
0900 
aunn 


PLACE INTEGER IN RO 
PACK XO INID Rie 80 ASSUMED 
NORMAL TZE KE SNTO X20 SHIFT COUNT EN 81 


UNPACK K2 INTO H3e SHIFT COUNT IN 62 


LEFT StF T XI INTO KO USING COUNT IN 82 


ARNORMAL TERMINATION 
TRANSFER ADDRESS 


15 STATEMENTS 1 SYMAOLS 


0000 
on00 
0000 
0000 
1nn2 
0000 
onno 


—Sttoo o000!8 03888 00055 
00000 C0200 90n00 ONnnt 
00000 OnNN0 nOHND OOL1) 
0nNhO DN0VO CON00 oCon00 


0.016 SECONTS 


0000 
ooal 
0000 
onoo 
o7lt 
onno 
onoo 


2? REFFRENCES 


CtAlh= ono00 o0onn 0000 
CIA2)e 
Cin3pe 
Cthete 
CtRSt=s 7300 $23% S627 
Ctinsts 
Ciutbe 


44550 02556 00000 46000 
07040 00060 $1600 00001 
40000 00000 O2000 001)) 


1002 4298 


00000 00000 00000 00000 
04000 0906) Onn00 CD02) 
00000 00000 40000 00000 


INCNVRE 
SYMBOLIC HEFERENCR PARLE, 


SNCNVRE a PROAGRAK® 


LOAD HAP - ENCNVAE 


Fwa OF Tee .Oad 
twaeg OF THE LOAD 


= 
=_— = 
wo 


TRANSFER ADDRESS -- INCAVRI 


PROGRAM ENTRY POINTS -- 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADOHESS = LENGTH 


INCNVRE oon 2 


Le-S 


2007 CP SECONDS 


COHPASS 3.9-470,. 0672977 


2702 € 270H L 
“CVAER LOANEW 1,.4-470 00721700 
tas 
INCNVAT ah 
FOLE Dal€ PROCSSR VER LEVEL HARDWARE COMMENTS 
tGo 06/27/78 CUMPASS 3.5 470 


132008 CH STORAGt USED § TAOLE mOVE 


“rr NA2- CVALIS-SNI 4LU7/ROB 05715778 
16.19.0%.DONOOME FROM 7SH 
§6.59.06.1P 00000256 wOHDS - FILE INPUT 
16.19.04.D0N. PSHeO2THADP2CTOLIANMILLER 
16.19.05. COMPASS, 
16.19. 06, ASSENULY COMPLETE. 47300A SCH USED. 
16.19.06, 0.068 CPU SECONDS ASSEMALY VENE. 
$6.19.06.160. . 
16.19.07,ERROR HONE 200. ADDRESS =000000 
86.19.07.0P 00000704 wOHDS - FILE OUTPUT ¢ OC 40 


e OC 04 


16.19.07.HS 3964 wORDS ¢ 10752 MAM USED) 
16.19.07.CPA 0103 SEC. 2103 Anu, 
16.19.07.40 0632 SEC. 0612 ADs, 
$6.19.08.C% 9.307 KMS, 2567 ADJ. 
§16.19.08.54 1.283 

16.19.08.PP 3.295 SEC, DATE 06/27/78 


$6.19.08.6) END OF JOG. SH 


16.19.0h. 


§6,19.07. 


PAGE 


PAGE 


PIGINE sO : 7 . . 
. MPASS 3.5- 
Ei naices RECICRI ONG COMPASS 3.5-470, 06/27/7H 0A,50.56. PAGE 


ADORESS LENGTH BINAHY CONTROL CAROS. 
0 Ss . 1DOENT wtGINt 
5 END AGING TRANSFER ADOKESS 
ALOCKS TYPE AVORESS LENGTH 
PROGRAM® LOCAL 0 4 
LITERALS® LOCAL 4 ' 


ENTRY POINTS, 


BIGINT Oe 
LOAD HAP - BIGINT CYBER LOANER 1.4%-470 06727776 08,50.57. - PAGE | 
fwA OF THE LOAD tah 
wi LwAeh OF THE LOAN 116 
! 
NN TRANSFER ADDRESS -- RIGING hit 
fee) 
PROGRAM ENTRY POINTS <- AIGINI uit 


PROGRAM AND BLOCK ASSIGNMENTS. 
BLOCK ADORESS LENGTH FILE OatTe PHOCSSR VER LEVEL HARDWARE COMMENTS 


BIGINT aa 5 ico 06/27/78 CUMPASS 3.5 476 r 
MPF 0 NB2-  CVBN7S-SNI &LOT/R6B 05/15/78 
08.50.54.DON00S) FROM /$H 

® 08.50.54.1P 00000320 WONDS - FILE INPUT » OC 04 
06.50.54.D0N. PS00027He72CTODIASMELLER 
08,50.56, COMPASS, 

BD 08.50.57. ASSEMBLY COMPLETE. 4739008 SCH USED. 
08.50.57. 0.062 CPU SECONDS ASSEMBLY TIME. 
08.50.57.1G0. 

B 08.50.57. ERROR MODE «00. A0DAESS ©000000 
08.50.58,0P 00000896 WORDS - FILE OUTPUT » OC 40 
08.50.58.4S 3564 wORDS ¢ 180752 HAA USED) 


2008 CP SECONDS 132008 CH STORAGE USED 


BD = 0a.50.58.cPA 2130 SEC. 130 AOJ. 
08,.50.58,10 0616 $s Ce 2616 ADJ. 7 
06,50.58.CH4 9.710 nWs, 2996 ADJ. 

BD = 08,50.58.85 1.343 
08,50.58.hP 3.526 SEC. DATE 06/27/78 


06.50.58.6) END OF JOB» SH 


i ‘ : 
2 : Pa 


RHumaimRememememememeRemReenRBtmRBenHmHhm Hm 
PIGINt . ; ; COMPASS 1.5-470,. 06727778 09,590.56. PAGE ? : 


PYTTTITITIT TTT 
° ° 
° CONVFASTON OF A LARGE INTEGER TO FLOATING POINT 70 INTEGER © 
° ° 
PYTTITTTITITITIL TTT Tri 


1OENT RAIGINT 
FNTRY alGiINt 


_ ; 
e CONVERSION OF A LARGE INTEGER (1.62 GREATER THAN 46 BETS) TO A 
° FLOATING POINT NUMAER AND AACK TO AN INTEGER 
3 e 
0 46000 AIGINT " NO 
e@ i 
° LOAD NUMAFR INTO 11 
@ 
Sitoeeooos « 9A 9123456712365671236R 
1 6210000006 sn 6 : PLACE SHIFT COUNT IN BI 
23211 AK2 xt.al SHIFT BEFORE PACKING 
27912 . PRI n2081 PACK USING SHIFT COUNT IN Bf 
2 2042) NX & x30H2 NORMALIZE XI INTO Noe SHIFT COUNT 10 82 
e 
° PACKED-NORMALIZED NUMBER NOW IN X&o SHIFT COUNT IN B82 
e 
vs 26534 UNS n4083 UNPACK K& INTO ASe SHIFT COUNT TO AD 
1 22635 LA6 xS5eAI LEFT SHIFT TeEe FINISH UNPACKING 
N 27701 PRT al PACKING WITHOUT SHIFTING 
o 3 0200000000 JP 0 ABNORMAL TERMINATION 
s €ND BIGINT: TRANSFER ADDRESS 
413008 SCM STORAGE USED 29 STATEMENTS 4 SYMAOLS 
MODEL 176 ASSEMBLY 0.032 SECONDS 2 REFERENCES 


P 00000 Ae 000200 fe 000000 
RA 240200 41 000115 RI 000006 CtALd= C012 3456 7923 4567 12398 CtAld= 9000 0000 0000 9000 0000 


- FL @00200 A2 000060 R2 000002 Cla2pe 1505 $8520 0000 0000 006) C(R2)= 90000 0000 9000 0000 0000 
; ; 4 700706 AJ 0000S? AI 000004 Ctadd=e 0000 0000 0000 G000 0000 CtA3d= O00 0000 9000 0000 000 
Re @00058 A& 000008 84 00070! C(ASd= 0000 000 0V00 0000 0000 Cipdbe 
FE €00000 aS 000198 AS 000318 CtaASd= 4600 O51) 0000 1156 6000 C(BSd= 4600 OS11 0000 1954 6000 
Ma 001000 a6 000001 A6 0002700 CtA6re® 0000 0000 0000 0000 9000 C(B6)8 
av Cooeotk BF 027756 CtAT= 0000 C000 0000 0000 0000 C(ATI® 
- RO 0000 0000 coce C000 0000 ‘ , ; , 
KE 0012 3456 7323 4567 1236 
me 0000 823% S6Ty 2345 6712 
AD 2006. 123% S671 2345 6712 
Ke. 200% $162 17345 81627 3450 
RS 0000 S162 7345 1627 3450 
NG OO12 3456 TH29 4567 1200 
RP 2000 3456 71239 4567 8236 


@0000 00000 60000 00000 00000 

00054 #56110 03110 00054 54710 Sitce 00001 03116 00055 £4550 02580 00000 46000 00000 00000 00000 000006 
00060 15051 $2000 00000 00061 00000 00200 00000 o0001 07040 00060 51600 0000! 046000 00963 0n000 o0021 
00064 14073 79000 g0000 00000 00000 00000 non00 00116 £0000 00000 02000 ootil — 00000 00000 40000 00000 


00070 be071 75755 00000 00000 00000 00000 90000 00000 


COMPASS 3.5-470, 04/27/78 0.52.91. PAGE 2 


txPONET 
1DENT FAPONET 
FNIRY GF XOONET 
cast 4% 
ee ee 
® e 
° RANGE OF EXPONENTS FOR VALIO UNPACKING ° 
e e 
° UNE AyeKK ° 
e i CRe U4 e 
e : % aay 
° IF TRUE EXPONENTs AND THUS Ru<-an THEN ALL OF THE SIGNIFICANT alts witt 
e RE SHIFTED OFF THE RIGHT END: OF THE WORD LEAVING ¢0 OR <0, 
e °® 
° ia TRUE EXPONENT IS POSETIVE, THEN THE SHEFT §S Cert, INCREASING THE ® 
e VALUE OF THE COEFFICIENT, TF THE SHIFT TS 12 BITS OR GREATER, YOU WILL © 
e HAVE SHIFTED A NORMALIZED COEFFICIENT INTO SIGN POSTTION AND THEN END e 
° AROUND. THUS CHANGING THE VALUF OF THE NUMBER. bed 
e e 
° THUS. A VALIN RESULT 45 ASSURED Ft -47 ¢ TRUE EXPONENT ¢ 01) (DECIMAL) © 
e e 
ehhh LILLIA T TTT Pee eee eee 
e 
e SHOW EXPONENTS OUT OF RANGE 
es 
© S$110000003 » EXPONET SA} =201476543210000000008 LOAD VALUE INTO AI 
ul 26221 Ux2 xl.@2 UNPACK XP INTO X20 SHIFT Count to 4 
a 22322 tnd n2082 LEFT SHIFT X2 ENTO x30 B82 PLACES 
( ‘ 
oO ; £ 
1 Sts0on0004 « Sas =1171776543210000000008 LOAD VALUE INTO Ke 
26554 UNS n4eB5 UNPACK K6 INTO XSe SHIFT COUNT TO 0s 
22455 LXx6 nSeAS LEFT SHIFT XS INTO noe BY BS PLACES 
e DB : 
2 0200000000 up 0 ABNORMAL TERMINATION DMPK, 
CONTENT OF LITERALS BLOCK. ) P 000000 £0 000208 no eevoco 
RA 825200 Ab 000186 Bt oo0001 
3 201476543z21000000000 PLOe?H FL 000200 42 -000060 #2 oooals 
& 27177654321000000000 gon=7H D EM 700700 A} o000ST 8) 012739 
RE 000041 &% 000115 Ae 0002701 
S END EXPONET TRANSFER ADORESS ; FE 000000 a5 ooonkt nS soPrret? 
» MA 000400 46 000001 86 000200 
473008 SCH STORAGE USED Je STATEMENTS 1 SYMBOL AT 000001 AT O29756 
MODEL 174 ASSEMBLY 0.036 SECONDS 2 RErERE. x0 0000 0000 0000 ov00' ovvn 
XL 2016 765% 3210 0000 o000 


X2 0000 765% 3280 O000 v000 
XJ TH5& 32810 0000 000 0000 : 
D =xe 1717 2658 3210 oooe 0000 
: XS 0000 765% 3210 0000 0009 
X6 0000 0000 0000 ov000 0000 
XT 0000 0090 0009 0000 0000 


Dd 
00000 00000 00000 vo000 00600. 
D 00054 #56110 03110 000586 S47lo 
00060 15058 52000 00000 o0nsl 
00064 eOTt Fo000 00000 oo000 
|) 00070 14071 75755 90000 00n00 


a ee ee 


Y 


t » 7. 
fee Pat a ge eae be ) | } | eS || 3] eS = = = a A ae | 
a 
i i 


ExPONET COMPASS 3.4°470, On727798 08.52.3186 PAGE 1 
STORAGE ALLOCATION. 
ACORESS = LENGTH BINARY CONTHOL CaknS, 
§ (NENT EAPONET 
5 END FAPONET TRANSFER ADDRESS 
BLOCKS TYPE ADORESS LENGIN 
PROGRAN® LOCAL 0 ) 
LITERALS® LocaL 3 2 
ENTRY POINTS. 
ERPONEY 0° 
EXPONET coupass 365-470 06/27/76 08.52.33. | A 
SYMBOLIC REFERENCE TANLE. ° : a2eeat pane ’ 
CAPONET o PROGRANMEe 2702 € (27248 t 
wa, , ’ 
r 
Ley) : 
H ° 
LOAD HAP ~ EXPONET CYMER LOADER 1.4-470 06/277768 06.52.32. PAGE ’ 
FwA OF Inf Goan | ban 
twAech OF Fue LOAD tl6 
TRANSFER ADDRESS ~- ERPONET vn : 
PROGRAM ENTAY POINTS -- EAPONET vs 
MEF = NB2- ss CVRN75S-SNI 4LBI/R6B 05/15/78 
08.52.29. N0N006S FROM s$n 
PROGRAM AND BLOCK ASSIGNMENTS. ' 04.52.29.1P 60000384 WORDS - FILE BNPUT «¢ OC 06 
; 06.52.29.00N. PSOcOZTAoV2CTOIRAOMILLER 
BLOCK ADOHESS = LENGTH FILE DATE =* PHOCSSA VER LEVEL Hy 06.52.31, ConPass, 
08.52.31, ASSEMBLY COMPLETE.  4&7300A SCH USED. 
ERXPONET goa 5 Go 06727778 COMPASS 3.5 470 06.52.31. 0.089 CPU SECONDS ASSEMOLV TIME. 
00.52.31.860. . 
' 06,52.32.ERROR HODE 200. ADDRESS #000000 
08.52.32.0P 00001024 WORDS - FILE OUTPUT » OC 40 
e007 CP StconDs 13200 CH STOHAGE USE 06.52.32.HS 35864 wORDS ¢ 1OYS2 HAN USED) 
. 1° 06.52.32.cPA of)) SEC. 2130 ADJ. 
. 04,52.32.10 0619 SEC. 2419 A0u, 


OALS2?.12.0H 9.9N2 wus. 2609 ADS, 


TESTFEO , COMPASS 3.5-470. 04/27/76 09.51.01. _ PAGE 2 


INENT TESTEPO 
ENTRY TESTEPO 


P cist ‘ 
e 
° TEST FLOATING POINT ZERO 
e 
0 5$810000095 ° TESTFPO SA 20.0 
loot AKO mt 
1 8880000006 - Sal #35 
31200 FX2 wpe PRODUCE 0.0 IN K2 
40221 FRI noent ZERO TIKES A NUMBER 
2 48421 FRG n27R1 TERN DIVIDED AY A NUMBER 
asSi2 FAS WESKZ NUMBER DIVIDED BY ZERO 
30451 FRG nSext USE PREVIOUS ANSWER 
30761 FXxT nGoKt USE PREVIOUS ANSWE 
3 ; ENORUN e 
d 7160247021 Sk6 JRENNSGe1 ; ENDRUN .2 
20650 LA6 400 ENORUN od 
& Of00000000 x Oy axSvse ENDRUN ol 
ENON : ENDRUN of 
DEFAULT SYMAOLS OFFINEO SY COMPASS. 
uo OR SyYSa 
! , 
5 CONTENT OF LITERALS BLOCK. 
ar I 
5 00000000000000000000 
6 17217900000000000000 oas 
? END TESTFPO TRANSFER ADDRESS 
473008 SCH STORAGE USED 2) STATEMENTS 2 SYMAOLS 


MODEL 17% ASSEMBLY 0.023 SECONDS 3 REFERENCES 


P 000000 a6 000700 AO O00Nn00 
RA 133800 49 QOO1TF AD O00nN! Ctalt= 1721 7000 0000, 0000 0000 CtAld= 9700 0000 0000 0000 0000 
TL 000700 a2 000060 A2 00002 Cta2te 1505 1520 0090 0000 061 CIH2)= 1000 0000 0000 0000 ono00 
€4 700700 a3 000057 fA 012733 CtAJd® ANLO DOFE 0000 OOn0 Onn0 CINd)s 
ME 000065 4% 000001 A& 000701 CtAsde N000 8000 0V00 0Nn0 on00 CIRS}s 
FE 000000 45 00311 AS 000331 CtaSd= Set0 O07 31610 O84 6000 CtASb= 6110 OOnf 1610 0114 6000 
“A 000600 &6 O00N01 AB 000700 CtA4d= 0000 voon oVv00 0000 on00 CIAtbe 
a? 000001 Af 027756 CtATI© 0F00 0000 0900 0000 onvo CIAT)» 
x0 0000 0000 000 9000 9000 
ad 61728) «7000 «0900 0000 000 
B2 1721 0000 0000 0000 0000 
nd 1721 000 0009 000 0000 
xe 9717 0000 0000 0000 0000 
AS 1777 0000 0009 0000 000 
AG 1777 0000 0000 0000 0000 
"7 1777 0000 0000 0000 0000 


00000 00046 00114 00000 00000 00000 9000¢ 00000 00000 
| oe 


ee a a 


3 _ | me oe 


TESTFPO 
OMPA eva? 
UR cet . COMPASS 3.5-470, 06727778 086.5).0)e PAGE sh 
ANORESS LENGTH BINARY CONTROL CARDS. 
0 r fOENT VESTFPO 
? END TESTFPO TRANSFER ADORESS 
ALOCKS TYPE ADORESS LENGTH 
PROGRAM® LOCAL 0 5 
LITERALS® LOCAL 5 2 


ENTRY POINTS, 
TESTFPO : Oe 


EXTERNAL SVHAOLS. 


SYS= 
uw 
! 
Lev) 
[5] 
LOAD MAP = TESTFPO CYBER LOADER 124-470 06/27/78 08.51.02. PAGE 1 
Fwa OF THE (OAD aa 
Lwaecl OF THE LOAD 160. 
TRANSFER ADDRESS -- TESTFPO | ant 
PROGRAM ENTRY POINTS -- TESTFPO iit : 
; MEF 8 =6NR2-. CYBITS-SN} @L67/R6B 05715776 
08.50.58,00N004L FROM 75 
’ 08.50.58,1P 00000256 WOKDS - FILE INPUT «© OC 64 
PROGRAM AND BLOCK ASSIGNMENTS. ; 08.50.58.D0N. PSO eO2TIHeTZCTORLAMILLER 
@6.51.00.COMPASS. 
BLOCK ADOKESS LENGTH FILE Oate PHOCSSR VER LEVEL HARDWA! 99,.6).01, ASSEMBLY COMPLETE. 473008 SCH USED. - 
08.51.01. 0.069 CPU SECONDS ASSEMBLY TEME. 
TESTFPO Phbe 7 t6o 04/27/47AR COMPASS 3.5 470 08.51.01.160. 
SYS.AM 120° 60 SL-SYSLI® 05/16/78 COMPASS 3.5 470 06.51.02.ERROR MODE 904. ADORESS 9000114 
j 06.52.02.0P 00001252 wOHOS - FILE OUTPUT »« OC 40 
08.51-02.mS 3584 wORDS ¢ 10752 MAAK USED) 
: 08,51.02.CPA el22 SEC. ot22 ADJ. 
2026 CP SECONDS 132008 CH STNRAGE USED 06.51.02,10 0676 SEC. 676 ADI. 
-_ 06.51.02.CN 10.066 aws, 2613 ADJ. 
. 06.51.02.558 1.41) 
06.51.02,pP 3.797 SEC. DATE 06727/78 


00.51.02.€J ENO oF J080 SH 


COMPASS 3.6-4764 02/04/79 14643206. PAGE 1 


IDENT ROUND 
ENTRY ROUND 
LIST s 


EXAMPLE SHOWING A ROUND NORMALIZE INSTRUCTION 


0 76100 ROUND Sx1 80 
1061) BX6 x1 
5160000006 ¢ SA6 ANSWER 
1 27201 Px2 x1 
10722 Bx? X2 
5170000007 « SAT ANSWER} 
2 25302 ZX3 X2 
10633 BX6 x3 ; 
5160000010 ¢ SA6 ANSWER*2 
3 §210000012 ¢ SAl OuT 
107k HX7 x) 
4 517000000) SAT 1 
5120000001 SA2 1 
5 0312000004 « NZ X24) 
6 4 ANSWER 8SSZ 4 oe 
12 05160420 out VFO 24/4LENDP TAKE THE PLACE OF ENDRUN MACRO 
13 END ROUND 


475008 CM STORAGE USED ' 23 STATEMENTS 3 SYMBOLS 

o MODEL 74 ASSEMBLY 0.070 SECONDS 0 REFERENCES 

Ww 

B, 

ouMP RELATIVE OMP (0.127) 

00000 00000 00000 00000 00000 00002_33000 00000 00000 00001 34354 20000 00000 00017 . 
00004 00000 00000 00000 00000 00054.56110 03130 00054 54710 51100 0000) 03110 00055 64550 02550 00000 46000 
00057 00000 00000 00000 00000 
00060 15051 52006 00000 00061 00000 00200 00000 00001 07040 00060 51600 00001 04000 00063 00000 00000 
00064 04152 00000 00000 o0002 00000 00000 O000U O0lz24s 40000 00000 02000 00112 00000 00000 40000 00000 
00070 1407! 75700 00000 00000 00000 00000 00000 00000 0010054000 00000 01000 00001. 00001 30000 00000 00124 
ool02 00000 00000 00000 00000 00104_00000 00000 00000 00124 00000 00000 00000 00000 OOLLO_22172 51604 00000 00133 
0012} 76100 10613 51600 00117 27201 10722 51700 00120 25302 10633 51600 0012) ; 
00114 51100 001323 10711 46000 51700 00001 51200 0000) 03120 00115 61000 46000 00000 00000 00000 00000 
00120 20000 00000 00000 00000 17174 00000 00000 00000 00000 00000 00000 00000 05160 42000 61000 46000 


00124 60000 00000 04004 00124 00127>60000 00000 04004 00127 


03/04/79 14.43.09. 


SES 


LOAD MAP =~ ROUND 


FwA OF THE LOAD 11) 
wae] OF THE LOAD 124 
TRANSKER ADDRESS -= ROUND 
PROGRAM ENTRY POINTS «« 


PROGRAM AND BLOCK ASSIGNMENTS. 
ADDRESS LENGTH 


121 43 


BLOCK 
ROUND 


e023 CP SECONDS 


cyeen LOADER 1.4-485 


mn 
ROUND 411 
FILE DATE PROCSSR VER LEVEL HARDWARE COMMENTS 
Leo 01/04/79 COMPASS 3.6 476 


135008 CM STORAGE USED 1 TABLE MOVE 


MFS NBl- CYBT4-SN108 SC/ROB 11/14/78 
14.34.42.00N0063 FROM 70H , 

14034.42.1P 00000256 WORDS - FILE INPUT » DC 04 
14234.42.00N)TS, 001A0688301896.HILLER E 
14.43.07. COMPASS »LO=BR. 


14.43.08. ASSEMBLY COMPLETE. 475008 CM USED. 


14.43.08, 0.200 CPU SECONDS ASSEMULY TIME. 
14.43.08.L60,° 

14.43.09, OMP (00127) 

34.43.09.0P 00900640 nORDS ~ FILE OUTPUT » DC 40 
14.43.09,MS 3564 WORDS ( 10752 MAX USED) 
14.43.09.CPA e287 SEC, e287 ADS. 
14.43.09.CPu 0061 SEC, 006) ADJ. 
14.43.09.10 0310 SEC. 0310 ADJ. 
14.43.09.CM 11.069 KWS. 0675 ADJ. 
14.43.09.55 1.334 
14.43.09.PP 5.030 SEC. DATE 01/04/79 


14043.10,EJ END OF J0Ge OH 


Bess 


: ODE 4 At Huy QO. SEC & REFERE 
meen ee ae eee ae eae ee 


COMPASS 3.57470, 04727778 086.57.39- PAGE i] 


INTMULT 
STORAGE ALLOCATION. 
APORESS LENGTH WINAHY CONTHOL CARDS. 
0 10 IDENS «INTMULT 
ro END so INTMULT 


ENTRY POINTS. 


INTHULT O°. 


EXTERNAL SYMAOLS. 


SYSe 
Intmuct COMPASS 3.5-470, 06727778 08.57.39. PAGE 2 
IDENT = NEMULT 
ENTRY = INTMULT 
List a 
‘ ; 
e 
e USING DOUALE PRECISIUN ENSTRUCTION TO MULTIPLY INTEGERS 
@ 3 
: : ; 
0 17100000013 INTMULT SxO ea PLACE 33 OCTAL IN KO 
7210000026 sai 24h : PLACE 26 UCTAL IN A} 
i 27200 Px? x0 CONVERT 13 UCTAL TO & PACKED FLOATING POINT NUMAER : 
27308 Px) ut CONVERT 2% OCTAL 10 A PACKED FLOATING POINT NUMBER 
4242) OKs w2eny OOUBLE PRECISION MULTIPLY = 
LEAST SIGNIFICANT OJGITS IN AS 
26504 UXS . a4 UNPACK XG CONTENTS INTO AS ~ 
, SHIFT COUNT GOING TO BO 
2 42601 OG .- KOOKD OOURLE PRECISION HULTIPLY OF 138 AND 248 
49723 Fx? n2eny SINGLE PRECISION MULTEPLY OF K2 AND AI CONTENTS 
3 %6000 TAKONE NO 
& 24402 , ry WA% ne 
245035 NKS nn) 
40645 FK6 K4OKS 
42745 . DAT nGOAS 
S £6000 TRK TWO NO 
6 @ ENURUN i 
6 716024702) SK6 JRENDSGS) : ENDRUN .f 
20650 LxX6 400 ENDRUN of 
7 0300000000 x AJ 2NSYSe ENDRUN 2 i 
€NDM : ENDORUN 1 
NEF AULT SYMBOLS PEF FINED AY COMPASS. 
Oa SYS3 
to f Nb INTHMULT 


473008 SCM STORAGE USED Jo STATEMENTS & SYMHOLS 


ae ra 


06/27/78 08.57.39. : PAGE q 


TRAP DIRECTEVES NERUG AOS 
DUNP) FRAME &F PROGHAM INTMULT Jo FROM PROGHAM INTMULT De FOR 30 REG 
DUMP2 FRAME. AT PROGRAM INIMULT Se FOR 0+ AFG 
TRAP DUMP DEAUG AIDS 067277786 00.57.62. PAGE 2 


FRAME IDENT - OUMPI PRODUCED AT = 095205 FOR AN AREA RETWFEN - 005202 AND 005205 ITERATION NO. = 000001 


© REGISTER SNAP DUMP} P s 008205 cM FL = 005300 €cs Fu = 9000000 ry 
° 402005300 ; X0=90000000000000000083 « 
e 81000305 €890201162615251424005202 Ri=n00001 (B1)200000000000000000000 K}=00000000000000000024% e 
« 422000303 (42) =00000000000000000000 A22005202 (B2)#710000001371 20000024 X2Ze20000000000000000013 ° 
e 43=000300 (43) *00000000000000001214 A32001234 (B83) 234555555555555555555 X3e20000000000000000024 e 
° A4=0001370 (441=04000005010000000000 AG2001236 (94) 236555555555555555555 24u20000000000000000336 ° 
e 057000436 (a5226110000001716N241115 n52002212 (BS) 260000000000000000001 X5200000000000000000334 e 
e 462000317 (461£000000000000000012 14 A6=2N0093)3 | (86) =00000000000000000001 X6200000000000000000334 ° 
° 472000326 (a¥) 03292329232 9543000175 R720003346 (87) =00000050000000000000 X7#20600000000000000000 e 


POOPIE TEETER irri iiisirrirririrrriritririrTirriiityrTt 


LE-G 


005700 §=24220103135504251520 5503171624111625050% 710000001 397210000026 27200273014242324504 TRACK DUMP CONTINUED® KéH TwPA>ATTZeD 
005206 £2601407236100046000 01000023664000001 226 24402265034064562745 01000023664000001230 TELGSE DS A Sv5 JTTSR*C5SteWeA SvS IK 


FRAME SOENT - DUNE? PRODUCED AT = 005207 FOR AN AREA RETWEEN = 0080000 AND 000000 ITERATION NO. = 000001 


POI TI III I III I IIIT IXTIVIITII TTT TIT ITiITiTiTTirlirTixrTirrrrirlirririrrririrvriririrrrrrririyyy 


© REGISTER SNAP OUMP2 P = n05207 CH FL = 005300 ECS FL = 9000000 ® 
bd a0-005300 : X0200000000000000000013 e 
° £1=000305 (499 2119624615251624005202 Ai2000001 (R1)=#00000000000000000000 21200000000000000000024 id 
e A2e000303 (42) 200000000000000000000 A2200%202 (H2) 871000000137 RL ON00024 K2=20000000000000000013 ° 
° 432000300 (439 2#00000000000000001234-: RIZ9001294 (83) 23465555559555555555555 K3=220000000000000000026 « 
® AanQ00170 (£41 204000005010000000000 Ao=N012346 (841 #346555555555555555555 X4017235400000000000000 7 
® 452000434 (AS) 26010000001 71602611895 852002212 (AS 2 =0000000000000000000! XS=17245000000000000000 bad 
® aneonorviy (449 2000000000000000018542 R4=000933 (86) =00000000000000000001 X%6217276700000000000000 ® 
Ld A72000326 (479 23292323923239543000075 #7=000336 (R79=00000050000000000000 X7216470000000000000000 bd 


8E-S 


wren t 

SyMPOL IC PIFFFQFNCE fart. 
Int t t) bRNnGvame 
SvG:x 0 Futevnay © 
TOR ONE a] PROGVaNe 
Tontwo 5 PRUGHAMe 


LOAN MAD -~ TWADVEL 


VA OF THE (080 
Lwaed OF THE LOAD 


gt 
S252 


TRANSFER ANNPESS -- INTmULT 
OCAUG FNTHRY USED -- TRPSETR 


PROGRAM ENTRY POINTS -- 


PROGRAM AND ALOCK ASSIGNMENTS. 


PLOCK ADDRESS 
TRAPPER ot 
INTMULT $202 
SV¥S$.AM S2le2 


0056 CP SECONDS 


LENGTH 


COMPASS ¥9.5-470, | 04727778 0A,57.99. 


2702 ¢ ero t 
P1AR 

AsO EL 

P7240 


CYAREA LOANFR 1.4-470 047277786 09.57.42. 


Sone 
ae 


TRAPPER |70? 


FILE nate PROCSSR VER LEVEL HARNWARE COMMENTS 


SO?) SL-SYSLIA 05/16/78 COMPASS 3.5 470 


a0 SL°SYSLIP 05716778 COMPASS 3.5 470 


LGo 


04727778 COMPASS 3.5 470 
PROCESS SYSTEM REQUEST. 


17600R CM StHAAGE USED } TABLE MOVE 


arr NA2- CYBIIS-SNI 4lLO?/R68 605728778 
00.57.36.00N0049 FROM 7s 
06.57.36.1P 00000320 woROS - FILE ENPUT « OC 06 
06.87.36.00N. PSN OZ2THc TZ2CTOLIACMELLER 
08.57.39.COMPASS, 
08.57.40, ASSEMBLY CONPLETE. 473008 SCM USED. 
06.57.40, 0.080 CPU SECONDS ASSEMBLY TIME, 
08.57.40.0G0. . 
06.87.42, REWINO(PUTOUT) 
06.87.42. COPYRF ePUTOUT. 
06.57.4),€01 ENCOUNTERED AFTER COPY OF FILE 
06.57.43, Oe RECURD 3 
08.57.43.0P G00012A0 WORDS - FILE OUTPUT » DC 40 
06657.4I.M5 3584 words ¢ 17920 MAX USED) 


06.57.4).CPA e2l) SEC. e2ll ADS. 
06.57.43.10 76) SEC. 076) ADS. 
06.57.43.CM 12.083 Kws. ePAT ADI. 
06.57.4%3.55 1.2 

08.57.43.PP $42) SEC. OATE 06/27/76 


08,57.43,.€) END OF yO8e SH 


PAGE 


PAGE 


a 


F 4 z : 


Compare Move Unit (CMU) 


THe Compare Move UNIT IS A STANDARD CPU HARDWARE COM 
PONENT OF THE CYBER 70 series MopeL 72 AND 73: MODELS 
172, 173, 174: anD OPTIONAL ON THE MopDEL 76 COMPUTER 
SYSTEM. IT PROVIDES THE CAPABILITY TO MOVE AND COM- 
PARE DATA FIELDS IN STORAGE WITHOUT HAVING TO USE THE 
REGISTERS, 


THERE ARE TEN 6-BIT CHARACTER POSITIONS IN EACH 60-BIT 
WORD. THESE POSITIONS ARE NUMBERED 0 THROUGH 9 FROM 
LEFT TO RIGHT RESPECTIVELY. THE 4-BIT CHARACTER ADDRES- 
SES OF THESE POSITIONS ARE (IN BINARY) 0000, O00]. 1.1, 
1000, and 1001, CxHaRACTER ADDRESSES 1010 THROUGH 1111 
ARE ILLEGAL AND CAUSE THE INSTRUCTIONS TO GIVE AN AD- 
DRESS OUT OF RANGE CONDITION, 


og 


RUetCdetrIe seers 
3 43. =, 


STORAGE WorD 


DATA FIELDS MAY SPAN WORD BOUNDARIES AND MAY START OR 
END AT ANY POSITION IN A 60-BIT WORD. 


EXAMPLE: 


ee ee 
10 CHARACTERS 


THE FIELD ABOVE STARTS AT CHARACTER 3 IN worD 50000 
AND ENDS WITH CHARACTER 5 IN worRD 50002, . THE FIELD 
HAS A LENGTH OF 2319 CHARACTERS. ONE LIMITATION FOR 


5000 
5001 
5002 


6 CHARACTERS 


5-39 


USING THE CMU IS THAT THE DATA FIELD MUST NOT BE IN 
AN OPERATING REGISTER oR IN ECS/LCM, 


COMPASS 3.X PROVIDES SYMBOLIC FORMS OF FOUR CMU InsTRuc- 
TIONS. THEY ARE: 


1) InpirecT Move = IM 
2) Direct Move - DM 
3) Compare CoLLATeD - (C 
4) Compare UNCoLLATED - CU 


OF THE ABOVE, ONLY THE INDIRECT Move (IM) INSTRUCTION 
HAS THE SAME TYPE OF SYNTAX AND SOMANTICS AS OTHER CPU 
INSTRUCTIONS, THE OTHERS ARE TRCATED AS PSEUDO IN- 
STRUCTIONS BY COMPASS, 


. 
7 


a : 


THis 18 A 30-BIT INSTRUCTION THAT MOVES THE CONTENT 


OF A DATA FIELD TO ANOTHER DATA FIELD ACCORDING TO A 
DESCRIPTOR WORD, MAXIMUM LENGTH OF THE DATA FIELD 
THAT COULD BE MOVED BY THIS INSTRUCTION IS 8191]Q 
CHARACTERS, THE DESCRIPTOR WORD CONTAINS THE LENGTH 


AND ADDRESSES OF THE DATA FIELDS. COMPASS ForcES THE 


INSTRUCTION TO THE UPPER LEFT OF A WORD BECAUSE IT IS 


. EXECUTED AS A PASS BY THE HARDWARE IF IT IS NOT THE 


FIRST INSTRUCTION OF A WORD. THE NEXT INSTRUCTION IS 
ALSO FORCED UPPER IN THE NEXT WORD, BECAUSE THE LOWER 
HALF OF A WORD CONTAINING AN INDIRECT MOVE I NOT 
EXECUTED, | 


FORMAT: 


‘EXECUTION: . THE DESCRIPTOR WORD IS FETCHED FROM STOR- 


AGE LOCATION (Bu)+K, IF THE DATA FIELD LENGTH IS ZERO, 
THE INSTRUCTION IS EXECUTED AS A PASS BUT THE EXECUTION 
TIME IS LONGER. OTHERWISE, THE CONTENT OF THE SOURCE 


FIELD 1S MOVED TO THE DESTINATION FIELD, IF THE TWO 
FIELDS OVERLAP, THE RESULTS ARE UNDEFINED, THE XO 


REGISTER IS USED FOR INTERMEDIATE STORAGE DURING EXE- 
CUTION OF THE INSTRUCTION AND IS CLEARED UPON COMPLE- 
TION OF THE INSTRUCTION, 


A PSEUDO INSTRUCTION MD IS USED TO GENERATE A DESCRIP- 
TOR WORD FOR USE BY THE INDIRECT. MOVE INSTRUCTION, THE 
MD INSTRUCTION HAS THE FOLLOWING FORMAT: 


5-41 


L IS THE ABSOLUTE ADDRESS EXPRESSION: ITS VALUE, IN 
THE RANGESO“L 8191, 1S THE DATA FIELD LENGTH IN CHAR- 
ACTERS, THE UPPER 9 BITS ARE PLACED IN BITS 56-48 oF 


THE DESCRIPTOR WORD WHILE THE LOWER 4 BITS ARE PLACED 
IN BITS 29-26, 


we Se ee ie fee me = an 
q 


Ks IS ANY EXPRESSION, THE FIRST WORD ADDRESS OF THE 
SOURCE FIELD, 


Cy 1S THE ABSOLUTE EXPRESSION, THE STARTING CHARACTER | 
POSITION OF THE SOURCE FIELD WITHIN THE WORD AT LOCA- 
TION Kes 


Ky IS ANY EXPRESSION, THE FIRST WORD ADDRESS OF THE 
DESTINATION FIELD, 


C, IS THE ABSOLUTE EXPRESSION, THE STARTING CHARACTER 
POSITION OF THE DESTINATION FIELD WITHIN THE WORD AT 
LocaTion K,, 


InpIRECT Move Descriptor WorRD FoRMAT: 
59 56 — 47 28 25 21 17 ~#.O0 


WHERE: 
Ly: Upper 9 BITS oF VALUE OF L, 
Ly: Lower 4 BITS OF VALUE OF L, 


THE DIRECT MOVE PSEUDO INSTRUCTION GENERATES A CMU 
INSTRUCTION THAT MOVES A DATA FIELD IN STORAGE TO 
ANOTHER LOCATION IN STORAGE. THIS INSTRUCTION DIF- 
FERS FROM THE INDIRECT MOVE IN SEVERAL WAYS. IT IS 

A 60-BIT INSTRUCTION THAT CANNOT BE SPLIT BETWEEN 
WORDS AND THE DESCRIPTOR WORD IS PART OF THE INSTRUC- 
TION, FURTHERMORE, THE LENGTH OF THE DATA FIELD IT 
CAN MOVE IS LIMITED TO A MAXIMUM OF 12719 CHARACTERS, 


INSTRUCTION FoRMAT: 


L IS THE ABSOLUTE ADDRESS EXPRESSION: ITS VALUE, IN 


THE RANGE 0<L<127, 1s THE DATA FIELD LENGTH IN CHAR- 
ACTERS, 


Ly IS THE UPPER 3 BITS OF THE VALUE oF L, 


L,. K,. Cy. Kp Cy: SAME AS IN THE MD INSTRUCTION, 


ExecuTIon: Same as IM, EXCEPT THAT THE DESCRIPTOR IS 
IN THE INSTRUCTION WORD ITSELF, 


Compare Corpatep (CC) 


THE COMPARE COLLATED INSTRUCTION COMPARES THE CONTENTS 
OF TWO DATA FIELDS, ONE CHARACTER AT A TIME, FROM LEFT 
TO RIGHT, UNTIL A PAIR OF CORRESPONDING CHARACTERS ARE 
FOUND TO HAVE UNEQUAL COLLATING VALUES, OR UNTIL THE 
DATA FIELDS ARE EXHAUSTED, IT IS A 60-BIT INSTRUCTION 
THAT OCCUPIES ONE FULL WORD (IT CANNOT BE SPLIT BETWEEN 
“TWO WORDS) AND CONTAINS ITS OWN DATA FIELD DESCRIPTOR, 


IT uses REGISTER AO To CONTAIN THE FIRST WORD ADDRESS 
OF A TABLE IN STORAGE THAT CONTAINS THE COLLATING VALUES 


TO BE USED IN COMPARING CHARACTERS, THE RESULT OF THE 
COMPARISON IS PLACED IN REGISTER XO, 


FORMAT: 


L. Ly. L. ARE SAME AS IN THE DM INSTRUCTION, 


K, IS ANY EXPRESSION, THE FIRST WORD ADDRESS OF THE 
FIRST DATA FIELD, 
5-44 


: ‘ ° 


C, 18 THE ABSOLUTE EXPRESSION, THE STARTING CHARAC- 
TER POSITION OF THE FIRST DATA FIELD WITHIN THE WORD 
AT LOCATION Kae 


Kz IS ANY EXPRESSION, THE FIRST WORD ADDRESS OF THE 
SECOND DATA FIELD. 


C, 1s THE ONLY ABSOLUTE EXPRESSION. THE STARTING CHAR- 
ACTER POSITION OF THE SECOND DATA FIELD WITHIN THE WORD 
AT LOCATION Kye 


EXECUTION: THE FIRST WORD ADDRESS OF THE COLLATING 
TABLE IS OBTAINED FROM REGISTER AO. THE CONTENTS OF 
THE DATA FIELDS ARE COMPARED FROM LEFT TO RIGHT. ONE 
CHARACTER AT A TIME FROM EACH FIELD, UNTIL TWO UNEQUAL 
CHARACTERS ARE FOUND. THE COLLATING VALUE OF EACH 
CHARACTER IS OBTAINED FROM THE COLLATING TABLE, IF 
THESE VALUES ARE EQUAL, THE COMPARE CONTINUES UNTIL 
ANOTHER CHARACTER PAIR IS UNEQUAL OR UNTIL ALL CHAR- 
ACTERS HAVE BEEN COMPARED, IF THE COLLATING VALUES 
ARE UNEQUAL, THE TWO DATA FIELDS ARE UNEQUAL AND THE 
FILED WITH A LARGER COLLATING VALUE IS THE GREATER OF 
THE TWO FIELDS. THE COLLATING VALUES ARE TREATED AS 
6-BIT UNSIGNED INTEGERS. 


NOTE THAT TWO UNEQUAL CHARACTERS COULD HAVE THE SAME 
COLLATING VALUE AND WOULD COMPARE EQUAL. UPON Com- 
PLETION, REGISTER XQ CONTAINS A GO0-BIT SIGNED INTEGER 
AS FOLLOWS: 


XO = L - N>O IF FIELD A> FIELD B 
Xo = +0 IF FIELD A = FIELD B 
XO = N - L<O. IF FIELD A <FIELD B 
WHERE N IS THE NUMBER OF PAIRS OF CHARACTERS THAT COM- 
PARED EQUAL, 
IF L=0, THEN XO=e0, 


_ THE FORMAT OF THE COLLATING TABLE IS AS FOLLOWS: 


59 53 47 N85 17-13 0 
(0) taf af ete] shal et 
47 


Pa 
e 


Compare UNCOLLATED (CII) 
THE COMPARE UNCOLLATED INSTRUCTION COMPARES THE CON- 
TENTS OF TWO DATA FIELDS, ONE CHARACTER AT A TIME, 


FROM LEFT TO RIGHT. UNTIL A PAIR OF CORRESPONDING 
CHARACTERS ARE FOUND TO HAVE UNEQUAL VALUES. OR UNTIL 


‘THE DATA FIELDS ARE EXHAUSTED, IT 18 A 60-BIT INSTRUC- 


TION THAT OCCUPIES ONE FULL WORD (IT CANNOT BE SPLIT 


BETWEEN TWO WORDS) AND CONTAINS ITS OWN DATA FIELD 


DESCRIPTOR. THE RESULT OF THE COMPARISON IS PLACED 
IN REGISTER XQ, 


FORMAT: 


Location |. OPERATION VARIABLE 


LOCASYM CU Ly Kae Cy. Ky? C, 


EXECUTION: SAME AS THE CC INSTRUCTION EXCEPT THAT AQ 
AND THE COLLATING TABLE ARE NOT USED, INSTEAD, THE 
CHARACTERS ARE COMPARED DIRECTLY WITH EACH CHARACTER 
REGARDED AS A 6-BIT UNSIGNED BINARY INTEGER, 


REGISTER XO IS SET IN THE SAME MANNER AS BY THE CC 
INSTRUCTION, 


< } | | | = be Fad me by feed 


LESSON PREVIEW: 


Lesson 6 


IN THIS LESSON SEVERAL IMPORTANT DEFINITION AND SPE- 
CIAL SYMBOLS THAT ARE AN INTEGRAL PART OF COMPASS are 
DISCUSSED, JHE PsEuDO-ops EQU, SET, CON. anp VFD are 


INTRODUCED, 
REFERENCES: 
CHAPTER 4 
TRAINING Arps: 


VISUAL SET V6 


PROJECTS: 


HOMEWORK 


OBJECTIVES: 


COMPASS REFERENCE ManuaL #60492600 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE 


ABLE TO: 


-l, DEFINE NAMES AND SYMBOLS AND GIVE EXAMPLES OF 


EACH. 


2. DENOTE THE DIFFERENCES BETWEEN DATA AND CONSTANTS, 
3, DEFINE EXPRESSIONS, GIVE EXAMPLES AND EVALUATE 


THEM, 


4, IDENTIFY ABSOLUTE, RELOCATABLE AND EVALUATABLE 
EXPRESSIONS, 
5, USE DATA GENERATION PSEUDO-OPS CORRECTLY, 


huMpata 


wOPSLP wonNwD 


15 
16 
u 
20 
21 


22 
2) 


is : —_ — Z 7 — : _ bee . . ‘ Ps, a Geet ke a? i " —— Ce 7 is feet © 
Nae 


ONHOKOHOOUDOENNOOODN? 
LPRRREERDERREEREREDI SS 
00000000000000000010 
00000000000000000010 
bI22e0000000NHNNNNDN 
17224900000000000000 
14420000000000000N00 
GOSSIPIITFVVIVITIVI? 
07304068385645 706520 
17224400000000000000 


U2 IASETI2 96567666446 


PV22OVPISIIIPIIITGS | 


16427152426164167266 


0000800000000N1 86100 
000000000000001 16100 
17374704000000000000 
17374704000000000000 
145709000000009N0000 


000009000000N0000N246 
09000900000000000740 


COMPASS, 165-470, BAs7PH/9H 09,194.59, PALE 


TDtNET NUPNATA 


® e 
e e 
. ENT OFCK OF NUMERIC DATA RENERATEN ® 
e 
e 

e ‘ e 
eae ee LITT XT ILI TILL ILI LL TLL LTT TT TTT eT Tee eee ees 
7 ; 

Mara ? POSETRVE BNTEGER 

Oata -9 NEGAlive INTEGER 

OATA 10A POST RANER 

Oara ain PRE RANtn 


FLOATING POINT NUMBFR = SINGLE PRECISION 
FLOATING POINT NUMAFA = OOUALE PRECISION 


OAtA ae 
Data = oof 


NEGATIVE FLOATING POINT NUMARER 
OatA 2004 FLOATING POINT NECIMaL 
mara 405 FLOATING POINT FRACTION © 972 © 114728 


Data 9234967929656 72664404R INTEGER NUMBER 
Data Gol2I4567123465607126F DOURLE PRECISION FLOATING POINT NUMBER 


Dara “4,0 


USE E FOR POWERS OF 10 


eeeseeae 


40000 INTEGER 

COMPARES 10 4&6 

40000 FLOATING POINT SINGLE PRECISION 
£0000 FLAATING POINT DOUBLE PRECISION 


DATA ry) 
DATA 4EES 
DATA 4 oF4% 
OaTa. 4 eFES 


e e 
e 2 e 
e “USF $ FOR AeNARY SHIFTING IN WORDS . 
° ° 
° ° 
ett hh heeded tet ddd tT IDL IL ITIL IIIT T ILI TTT TT TT TTT TTT 
e 

OaTa $951 Oot 010 0 fREINARYVe}2ne2 © 248) 

MATA. tePss Oot 010 000 O IRINARY = J2He)6H & Peond 


° ° 
e 

USF P SCALING FOR: UNNORMALIZFN NUMNERS e 
e 
e 
e 


deeded tt eh hh ALTAR IITILII TITTY TY TILTTT TY TTTTTyT ty) 


. 


NUMOATA 


26 17245000000000N00N00 
25 200000000U0000000050 
26 =20030000000000000005 
27F 1774000000000N000400 
30 00000n000u0000000N00 
Ji =LPFAOQ0NGOV0D00000002 


32. —s«17760000000000000002 
3d  HOORTTIRIPCTITTIIIIIS 
324 =00000000000000000000 
3S 00000000000000000000 


47300h SCM 


wUuMnaTA 
Erenn niPEeCctoay,. 


A TYPE FROM 
OCCUNRED ON PAGES 


> 
‘ r os = = , : 


vata 
Data 
ata 
Maga 
Mara 
nara 


40,0 
&0,P0 
40,P-3 
40.P3 


ur a) 


a.nave 


TCUMPASS Be5-HIN, Oas2usin 07, 34.59. PAGE A) 


NORMAL TZ7FO FLOATING POINT AmneR 
UN-NOWMAL IT ZEO FLOATING POINT NUMALH (POSTTIONEDD 
SulF EO RIGHT 
SHIFTED CEFe 
NO SIGMIF ICANT AITS IN WEGISTER 


LOFT Setet 


Oara 


Dara 


Daya 


ENn 


STORAGE USED 


EVALUATION UNDER 1S F THEN S THEN P 


1. 2P1S-SEI 


NEES 


MOMEL 174 ASSEMNE ¥ 


-1.2P15-SE] 


71 STATEMENTS 0 SYMHOLS 


0,064 SECONDS @ ALFEKENCES 


t FRRUR Ih NUMNATA 


anNnerss FITLA wan, 


3 


COMPASS 3.5-470, 06728778 07.34.59. PAGE = 

“re NAZ- CVYALIS-SNI SLAI/REA ASSESS IA 
07.36.57 NONDOIW FagM 7s 
07,394.57,1% 00000640 WONNS ~ FILE INPUL « NC Me 
07,394.57. 50N. PSE M2IPe PACTOPIAMILLER 
07,314.59. COMPASS, 
07,146.59, P ERANH If NUYNATA 
07,176.59, ASSEMNLY EGNORS, 47300" SCH USEN, 
07.74.59, 0.116 CPU SECONDS ASSEMALY Thee, 
07,94.59.0P PNONLOAA WORDS - FILE VUTPUT « UC «9 
07.14,59,45 WAG WORDS ¢ 10752 “en USFOD 
07,3%4,59,CPaA of4] SEC. oo) ane, 
07,314.59, 590 o4AhO SEC. oSAR ANU, 
07,3%.59.CM 9.359 HWS, e571 ans. 
07,36.59.PP 2.196 SEC. DATE O672A877A 


UT.L34.59.63 END OF JORe Su 


i 
Hy 


COMPASS 3.5-470. OA7297778 = 0f,49.250 PAGE | 2 


re me teen 


pata 
IDENT Mata 
FNIRY MATA 
cist % 
e 
° USF OF NATA PSFUND OP eeeveeCHARACTER PaATAcovese 
; z ° 
0 0)020304050600000000 tvePrc OATA acancorfr LEFT JUSTIFIED WITH 7680 FELL. Foe DATA ITEMS OR 
2 09020 304050607100000 oara QCARCNEFGHE LETERALSe $2 7FRO BITS ARE GUARANTEED AT THE ENO OF 
2 00000900000000000000 
THE STRING EVEN IF ANOTHER woRD MUST BE ALLOCATED. 
FOR A CONSTANTs THE 7ERO BETS ARE NOT GUARANTEEDS 
C US THe SAME AS L FOR A CONSTANT 
Space ? 
3 01020304050655555555 TvPEH Data éHaACDEF LEFT JUSTIFIED with ALANK FILL 
& 040203040506071018155 DATA QHARCOEF GH) LEFT JUSTIFIED WETH ALANK FELL 
spect 2 
—§ 5555555508020 3040506 TvPEA DATA AAAACOHEF . RIGHT JUSTIFIED WITH BLANK FILL 
6 S5501020390s050K0TION! Oata QAARCDEFGHE BIGHT JUSTIFIED with BLANK FILL 
§PacE 2 
? 000609e00010203040506 TYPER Oara enancner RIGHT JUSTIFIFO with ZEao FILL 
j 10 000102030s0S0e0TIOII DATA ORAACOEFGHE RIGHT JUSTIFIED white ZERO FILL 
space ? 
bh 09020304050600000000 TYPEL DATA = ALARCOEF LEFT suSTIF IED WITH ZERO FILL 
82 09020304050607101100 DATA OLAACOEFGHE LEFT JUSTIFIED with 7ERO FILL 
gspact ? 
3 01020304050600000000 ¥vPe?z QOaTAa ar2aBCDEF LEFTY yuSTIFIEO WITH ZERO Fitte FOR DATA ITEMS OR 
16  09020304050607101100 Data QZAACDEFGHE LITERALSe SIX ZERO ALIS ARE GUARANTEED Af THE END 
15 09020304050607101312 DATA JO7ARCVEFGHIS OF THE STRING EVEN JF ANOTHFA WORD MUST BE ALtLO- 
16 00000000000000000000 
CATED. FOR A CONSTANTe THE BITS ARE NOT GUARANTEED 
17 -02020304050600000000 DATA e6CAHCOEF SIGNoNe VYPE eSIRING 
20 PAVSPATIPZIVITITIVIT DATA -6CANCDEF SIGNeNe FYPE eSTRING 
21 01020 304050600000000 para 6CANCDEF SIGNeNe TYPE oSTRING 
spact 1 
22 04050601020355555555 DATA oH*DEF ARCS SIGN» TYPE sDEL INT TERS STRING DELIMITER 
23 PIVATPTOISPEZ222AZ222 DATA “HONt FaAnCce S1GNo TYPE DEL THITERS STRING DEL IMETER 
246 04050601020 355555555 DATA HeDEF ANC? SIGNe TYPE SDEL IMITER gSTRINGONELIMETER 
space 1 
25 $19003070) GAt Waac NeTYPE STRING 
space 1 
2h SPPOONOOAT « DATA sat 3 AAVEFG weSiGNeNe TYPE eSTRING 
S1ing000nra Sal s-4A0EFG weSIGNoNe TYPE cSIRING 
27 SiLV0ONOOHF « sal =NGaVtEFG weSEGNeNe FVPE SSTRING 


. ‘ 


: a 
DATA . COMPASS 35-470, — -06/27778 99.49.25. PAGE 3 


SEC 
USE OF MATA PSEUDO OP SeeeeeNUHERIC DATASSSeCe 


30 00000000000000000125 DATA as VALUE 


) RRA PPAR RRR RRR aL) MATA -J SIGN. VALUE 

32 «17204900000000000000 DATA 1-0 STGNe VALUE 

33) -7225000000000000000 DATA Ben SIGNe VALUE 

Ve =17246504631846314639)%6 OATA 020.3 SIGNePRERADI Ae VALUE 

35 1 7245046384631463146 DATA 0020.3 SIGNsPRERADEN eo VALUE 

36 -60532739463146314632 DATA -D20.3 SIGNePRERAUEA oe VALUE 

37 «=17244060000000000000 OATA 820.) SIGNePRERAOTRA e VALUE 

40 GOSISILTIOTTTITTTTTT OATA -920.3 SIGNePRERADIA VALUE - 

a) = -17244060000000000000 DATA 820.3 SIGN ePRERADEXK VALUE 

2 173363146394639146315 DATA 506-2 SIGN» VALUE sMODIFIER 

43> §873076%0000000000000 DATA §.0€2 SIGN es VALUE eMODIFIER 

4% 37307640000000000000 OATA 5-0€E2 » SIGNe VALUE eMODIFIER 

45 16500000000000000000 

46 17307640000000000000 DATA ¢5.0€E2 SIGNe VALUE eMONDIFIER 

47 16500000000000000000 

SO GCOSTOLIITITIIVIIITT? OATA -§.0€E2 SIGNe VALUE eMODTF IER 

CY nS FARR RRR A RRR : : “ 
on) S52 20000000000000000001 OATA 1-0P0 SIGNe VALUE MODIFIER 
! Sd SorvrvzvvvezvvzvIIIIIe DATA -1.0P0 SIGNe VALUE eMODIFIER ; ‘ 
oa S& 17740000000000000400 DATA Jo2EIPZ _ SEGNe VALUE eHODIFIER ' 

' : SS 17200400000000000000 DATA 0-18P47 SIGNe VALUE eHODIFIER rs 


W 1S OMSTTED 


56 $555555555551531160S ‘DATA = AH INE® 
$7 DATA Hee 
S$? 05222217225511165520 DATA L°ERHOR IN .PODQ> 
60 04210906000000000000 
e 
e Neo 
e 
61 5555$55$5555521 71016 DATA  AJOHN 
62 12171016000000000000_. DATA OLJOHN OOF SPACE ACTS AS A DELEMITOR 
63 DATA OL JOHN DOE SPACE ACTS AS A DELIMITOR 
? 63 TeLOOVITIG Sa ORSYMBOL : ; 
? 7820010203 SK2 NHARCOEF GHEY 
64 7330000060 SAI IA.ol 
A 65 00000000000000000000 DATA Lae | 
66 00000000000000000123 MINE DATA 1238 
CONTENT OF LITERALS BLOCK. 
67 §§5555555555504050607 — OEFG 
TO 22222222 222273727170 RRRARRD «64 
2 . END 
473000 SCH STORAGE USED 64 STATEMENTS @ SYMBOLS 


; a MODEL 174 ASSFMALY 0.06A SECONDS @ REFERENCES 


mata : . COMPASS, 149-670. 04/27778 08.49.25. PAGE I 
STORAGE ALLOCATION. 


ANORESS LENGTH HINANY CONTHOL CARDS, 
0 7 IDENT pata 
LAY : FN 
BLOCKS TYPE AVORESS LENGTH 
PROGRAM® LOCAL 0 6? 
LITERALS® LOCAL 6? ? 


FNTRY POINTS, 
DATA Pre 


pDaTAa ; COMPASS 3.5-470.. 06/27/78 06.49.25. PAGE ry 
1 FRROR IN DATA 


COMPASS 3.5-470. 06727778 08.49.25. PAGE 5 


DATA 
fon) E€RAOR DIRECTORY. 
i . aod 
oO a VyPE ERAOR ADORESS FIELD BAD, 
OCCURRED ON PAGES © 3 
y TvPE ERROR ADORESS VALUE EXCEEDS FIELO SIZE> RESULT TRUNCATED 
OCCURRED ON PAGES 3 
Mata COMPASS 3.5-470, 0727778 0f,49.75. PAGE 6 
Sym4n_ iC PEFEQENCeE TAPLE. 
Oata 26 PpanGguane 2/02 F 2756 0 
MINE 6h PROoGHaMe WS6L : 
TvPE a 5 PANGRAMe a7v2ue ° 
tvPEC 0 PHOGRaMe 2/07 L ‘ j 
TyPFH 3 PROGRaMe PAIBL 
TvVPEL ot PANGRAM® 2/39 L 
TveceR ? PugGRaNe PAB L 
TyPFl 13 penGgHrame es36L 


S = : : ss 4 
. = - oc 


“rr NPP~ CV¥NITS-SN) SLATZRAN = ASSESSIN 
OA,49,2T.PONGOSR FAQM asia 
0A,49.23,.1F OOONNSTe wONDS - FILE Enpur . Ar oe 
06,49.23,N0N, PSN eOZIASPPCTAPIASMILLEP 
008.469.2725. COMPASSILOT§S9S) 
0f,49.28, 2 wAQNING “FSSAGES IN MATA 
08.69.25. 1 FRRON IN” DATA 
OA,49.26. ASSEMBLY EQRORS, STIOOR SCH SFO. 
ON.49.276. 0.199 CPU SECONDS ASSEMALY TIME, 
08.49.26,0P O0v0R2IE WONDS - FILE OUTPUT »« OC 4n 
09.49.26.4S 3504 woRps 14 TIOA max USEND 
09 .49.26.CPA 0866 SEC. 0166 An, 
00.49.26.10 0491 SEC. i 2492 405, 
00.49.26.C 9.93) Kus. «60h AN’, 
00.69.26.58 3.264 
06.469.26.PP . 20499 SEC. DATE 06727778 ‘ ~ 


06.49.26.65 FNO OF 3080 St 


L-9 


CON 
ERROR OLRECTORY. 


wK OP WNBPOAWNDEOKW PUNO S 


00000000000000000000 
00000006000000000006 
0000000000000000000) 
00000900000000000024 
00000000000000000055 
000009000000000000)3) 
00000000000000000064 
60000000000000000033 
d»O00HD00V0000000NN 
33555$55595559959555955 
§55555555955555595 33 
00000000000009000060 
00000000000090000000 
716024702) 


SvM 


@eseeenevoovoeeeseven ed 
Las] w 

= < 

v =z 
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MPTYTTTTITITITI TTT 


CON 


(nen 
€ntay 


COMPASS 1.5°670, 


con 
can 


CON = GFNFRATE CONSTANTS 


THE #CON@ PSEUNO INSTRUCTION GENERATES ONE OR MORE Fimt WORDS OF 
AINANY NAA IN THE HWLOCK IN USE. 
GENCHATES EXPRESSION VALUES RATHER THAN DATA BTEHS AND DIFFERS FROM 
VFO ON reat THE FELD SOZF US FEREO, ; : 


CoN 


LF PACSENT. SYM $5 ASSIGNEN THF VALUE OF THE LOCATION COUNTER AFTER THE 


LOCATION OPERATION VARPAGLE SUBTIELDS 


EXPL cE RP Ze crecee ef HPN 


FORCE UPPED OCCURS, 


AN ABSOLUTE> RELOCATEABLEs OR EXTERNAL EXPRESSION THE VALUE OF WHICH WILL 
RE INSEXTEN FNTO A FEFLD HAVING A SIZE OF ONE WORD. 
FLOATING POINT IS NOT ALLOWED. FOR CPU ASSFMBLYVe QOUBLE PRECISION 1S NOT® 

e 


ALLOWED. 


CON 
CON 
CON 
CON 
CON 
CON 
CaN 
‘CON 


CON 
DATA 
ENNRUN 
ENN 


473008 SCH STORAGE USED 


aA VvPE FRAOW 


OCCUMRED ON PAGES 


HONEL 174 ASSEMALY 


1 FaRoR 


ADNRESS FIELD Wan, 
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i] 

Aé 

1 

20 

1a 

180 

yAae. 

TRH ALO THOLIAD 


a | 
iA,ol 


cON 


40 STATEMENTS 
0.046 SECONDS 


™ CON 


COMPASS 365-470, 


OQASPTZIA = 16.29.23. PAGE 2 


IT OFFERS Faod DATA IN THAT IT 


FOR PPU ASSEMAL Ve, © 


2 SVYMROLS 
v REFERENCES 


OHs27/TH = 86,29.730 PAGE a 


~ . é - ‘ ' 
7 kh wt - ig 2 


CON COMPASS 3.5-470, Oh/27/TA 16.79.23. PAGE ! 
STORAGE ALLOCATION. 


. 


ANDRESS LENGTH RINANY CONTHOL CARNS. 
0 Ve IDENT fON 
7 END CON 


i ; ENTRY POINTS. 


CON 0° 


EATERNAL SYMAOLS. 


SYSe 
. | 
; con COMPASS 3.5-470, 087277770 16.79.71. PAGF .4 
SYMAOLIC PFFFOFNCE TAULE. ; ee : : 
CON 0 Pungrawe 2702 F PFPR LU ‘ 


SvSe 0 Fereauace arya 


: ; MrF NR2- CYBI7S5-SNI 4LB7/R6B 05715778 

: 16.29.20.00N00MU) FROM 73H 

16.29.20.1PF O00003A% WOHDS - FILE INPUT » OC ne 
16.29.20.00N. PSC eO21Be T2CTOLLACMILLER 
16.29.22, COMPASS, F 
16.29.23. 1 FRRON IN CON : 

; 16.29.23. ASSEMBLY EnRoRs. #7300f SCM USFD. 

| 16.29.23). 0.093 CPU SECONDS ASSEMBLY TIME. 

16.29.23.U0P 00000704 wOHDS = FILE OUTPUT « OC 40 


: 16.29.23.4S 350% woRDS ¢ 716A MAX USED) 
; 16.29.23.CPA ofS SEC. otiS ads. 
i 16.29.23.10 0478 SEC, 0978 ADJ. 
16.29.23.CM 0.606 KwS, ' 6528 ADJ. 
16.29.293.55 1.958 


16.29.23.PP 2.950 SFC. - DATE 04727778 


COMPASS Bebe GNU, VHs2TZIA 1.29. Be pact t 


DES 
STORAGE ALLOCATION. 


acORESsS LENGTH AINAHY CONTROL caanns. 
0 22 1DENF HIS 
22 ; ; END eras 


ENTHY POINTS. 


FIRNSst ne 


EXTERNAL SYMHOLS. 


SYS= 
os . ; COMPASS VW.5-470, 0472777B 16.29.35 DAGF ? 
[e>) INFNE nic 
J 6 R Wy 
rar : NTey Ft T 
2 2 
° USF OF ITS. PSEUDO INSTRUCT TON —— ; 
Ld ’ 
e ; : _ 
List on § D ie 2 Ww Qe 
@ 01020;040504N7101112 FTAs 01s 2eARCOFFGHIIKABCOFFGHIS 
1 230502030405080710I1 . 
2 0119414051601 14140516 nts 2eALLENALLENALLEN 
> 029419605105555555555 i, 
@ 10)72704310000000000 nis @eeHOWDVe : 
S 03979520082 923550530 01s p/COMPASS FXAMPLE 6000/ Uy 
& OLISZONS0S5S07R TI TOS 
7 00000000000000000000 
e 
e USF OF 98557 PSEUND OPERATION 
e 
10 10 2—-ti«SS A Ass? a ; ‘: 
20 SAVEONE S52 
20 71h0287021 ENNRUN 
DEFAULT SYMAOLS OFFINED AY COMPASS. 
on SsYvse 
22 END first . ; 
673900R SCH STORAGE USED 22 STATEMENTS & SYMROLS . 


MODFL 176 ASSFMALY 0.026 SECONDS & REFERENCES 


1 fq . e n = se Ls 
aS | ‘ | | | | ae 


015 5 COMPASS 165-470, DA727/78 16.79.95. PAGE 7 
SYMNOLIC REFERENCE TANLE. 

ems 0 ronchane e702 ¢. esnat 

Save 10 > - PHOGRane 2720 1 

SAVEONT 20 PeNGNane Prete ; ° 
Sy¥Se 0 TateAnare 2723 . 


ry 


wer | 6ONR2~) CVE TS-~SNI ALOTsABY 05715778 
16.29.32 .D00N00MYV FROM 7Sue 
96.29.3Z2.0P 00000256 wOrDs - FILE ThPUT 6 NC 06 
16.29.32.00N. PScOZPHoTAECTORIASHILLER 
16.29.94, COMPASS, 
06.29.35. ASSEMOLY COMPLETE. 473008 SCH USED. 
16.29.95. 0.072 CPU SECONDS ASSFHALY TIME. 
16.29.35.0P 00000448 WOHDS ~ FILE OUTPUT 6 UC 40 


ee 16.29.95.MS 9584 WORDS ¢ 109752 HAN USED) 
aa 16.29.35.CPA 2095 SEC. 2095 ADJ. 
be 16.29.95.10 470 SEC. 2470 ANS. 
36.29.35.CH 7.967 wud, ce) eGAS AOS. 

16.29.35.55 1.051 
16.29.95. 2.100 SEC. «= DATE 06727770 


16.29.35.€3 END OF JORs St 


Lttrea : COMPASS 1.5-47N, 0472797778 16.30.59, - ~PAGE 2 


fOrhNt a tvewaL 


FNIRY “I 
s 
e 
e wa 
. USF OF CTTEMaL PSFUND Opreatvion MFF NR2-  CYBITS-SNE 6LU7/ROA 05715776 
e 16.30.56. DONOOMA FAON Su : ; jens 
‘ - PU e ’ 
List NebeN 16.30.56.1P 00000320 wOHDS - FILE IN 
0 51300n0020 « st “as Gee 16.30.56,00N. —- PSNe O27. TZ2CTOLIACMILLER 
Sisooonn2t « S a4 iio 16.30.58,COHPASS, | 
1 30738 (Xt —edsae 16.31.00, ASSEMBLY COMPLETE. %7300R SCH USED. 
viper “ce cae 16.31.00, 0.082 CPU SECONDS ASSEMOLY TIME. 
Sinoo000IF «© sar SAVE *6 16.31.00.160. 
2 Sttoonco2e « Say =0.0 ppb tap aie aa 
? rR? a 16. DP OLLERETS 
‘Site <ai> anv. 16.31.01.0P 00000896 wORDS - FILE OUTPUT « DC 4 
aero? on 16.31.01.mS. 3584 WORDS ¢ 7368 WARK USED) 
& StT00000I2 « Sar SAVECE $6.31,01.CPA ened ores arin 
5120000023 « SA2 dS 16.91.01.10 oA32 SECS oes oot 
5 30621 7x6 nent 36.32-01.CH 10.066 KwS. ai ADSe 
oS 36.31.03.58 . 
Fe a caueaelers SAR eaveSS. 16.31.01.PP ps aTs alee PANE er eee 
6 4eni2. uy MEO? 16.31.08.€/ END or J086 SH 
5170000015 « SA? SAVE *8 
‘ 44612 F FRA misne 
= 1 Sr600c0016 » SAR GAVESS 
1 FNNAUN ; 
he TIAOZLTO?I S56 IRENDO Kot ENDRUN 49 
NO 10 20650 Lx6- 40n ENNAUN .} 
0100000000 x AY exSvS« FNDRUN Af 
MR EILASTATISEAE REALL A SAVE DATA «0 
12 6 ASS? 4 
DEFAULT SYHROLS DEFINED AY COMPASS. 
OR SvGs 


CONTENT OF LETERALS ALOCK, 


20 «8206000000000 000N00 OP: 


26) 17 206n00000000000000 OPS 

22 O0000000000000N00NNND 

23> 172)7%?n000v0000000000 aoe 

a FND 41 

47TIONA SCH SINAAGE tISED 3V STATEMENTS  SYMAROLS 
MONFL 87% ASSEMAL YY 0.034 SECONDS tn REFERENCES 

LETER AL ? COMPASS 3.5-4670, On727/76 16.30.59. PAGE B 
SVMBOLIC OFFFRENCE Pante. . : 
Save nl PANGHaMe 2713 §$ e710 § sia s 277? S 2724 § 27276 § e7dre 
st tC] PROGHANe 2702 €£ 2709 t 
Sv$s Q €sTeRNaLe 2/30 . 


; é ; ; : “ Ze s ' 5 3 ~ 
= ~ . ‘ , Y 
me ee . : ; . : : 


= a ee z | eS me ‘ = kx ‘ “2 
; | | ee] es ae 


LOAD WAP - LETEHAL CYMER LOADER |.4-470 On/20778 IA DNeOl. «= PAGE i 
va OF THE LOAD TT . : 

twa-+} OF THE Loan : ts . : 

TRANSFER ADNRESS -- SF ie 

PROGRAM ENTAY PUINTS -- LITERAL wt 


PROGRAM AND ALOCH ASSIGNMENTS. 


ALOCR ADDRESS «= LENGTIN FILE pate | PHOCSSA VER LEVEL HARNWARE COM4UENTS 
CUVERAL ben 24 ico On7217TA COMPASS 13.5 470 
SYS.RM 135, «0 SL-SYSLIB OS/716770 CUMHPASS 32% 470 PROCESS SYSTEM REQUEST. 
202) CP SECONDS , 83200R CH STovact USED 1 TANLE MOVE 
ue MEL ATIVE NMP CTU HII? 
aC ooltk $8300 OOFTE SIANH 00412 30794 Perv? Si700 00830 51100 00193 T1718 44000 
a oorls SEEING OOF22 CaTH? S&hN00 StTan noted steno 013% Wet 26606 51600 00125 40712 SIT00 00126 44612 
oS ; 
. 0120 «$2600 00127 Flan? Stn21 20650 01000 no1y? 46000 0000 00000 00000 00000 = nol2s-tr217 00000 00000 00000 
evlz4 00000 00000 00000 00n00 0n1 30487215 00000 n0000 00000 - 17206 00000 00000 00000 17204 00000 00000 00000 
eels) e0000 0000 @0000 00000 
001346 17257 CONDO DOHMH 00000 04000 ONIS0 nNNDD 0000 1300 00008 n0000 on000 04000 00122 00000 00006 
CUTERAL COMPASS 3-5-4170. On727778 16,390.59 PALE ‘ 
STORAGE ALLOCATION, 
ADNAESS LENGTH BINAHY CONTHOL CARDS. 
0 24 TOFNT UTTEHAL 
a Eno st 
ALOCKS TyPt AVDAESS LENGTH 
PROGRAM® LOCAL 0 20 
LITERALS® LOCAL 20 & 


ENTRY POINTS. 
gt ne 
FXTEANAL SYHAOLS. 


SYS 


vin 


VI-9 
re 


3 


4 


iS 


16 
i" 
7 20 
ra] 
’ ?? 


00000000000000000100 


25 


0000000000 
0025 
15310671 16050Nn 
00 
tool 
§120000032 « 
15310 
GLP140S00001001 
$120000033 « ; 
00n000001 
610 


000900000000S2 
00030 


000000004 
5120000008 « 
0107032301 
1555000008 
020404 
230115 


S110000038 ¢ 
32 
Si2n000n32 
5130000036 © 
; 32 
36 
40 
4) 
45 
a7 
513n000032 

140000031 °¢ 
5190000042 


$2110n0055 
51210302703 
51192010255 
$14191910703 
$1540203046 
51205132752 
6110010455 
4120010703 
4130020304 


oeoeet @ 


@eeete 


Sam 
CHECK 
186 


TAGL | 


vFO 
CHKLET 


CHKL ive 


UNeNt 


FNIR 


v 


SF OF 


nata 
fay 
Vet) 
any 
ven 


vFn 
ven 


ga2 
vFn 


SA? 
vio 


VFD 
VEN 


say 
VFO 


vFD 
vFn 


USF 


Sal 
us 
$a2 
Sad 
utr 
utr 
utr 
cir 
clr 
cit 
say 
SAG 
$a5 


oF 


FONPASS Be-G70, 


vin 
vFD 


VFpD PSFUDD THSTRUCTIAN 


100A 

au 

1S77STIAN 

al : 
&2/CHE CK! 


&270L HVE ILE 
pAs 2001 


CHKE ET! 
G270LMYF ILE sf A71001A 


CHKLETo! 
20/801 0/27 


&O/CHECKS 
107323076 


TAG 
187 IARC e24/6HSAM 2170 


Pr 3HABC 
{As HSAM 


LETERAL PSEUDO INSTAUCTION 


atO.S&e 
Vot.0e20E2 
CHHL it 
ChKLhte2 
VoteOe20E2 
TeSHANC C2 
TeSHANCOF 92 
Pe SHADC 
&eSHAAC 62 
TeSHANDe? 
al? 

210.5F4 

22 


FRAMPLE OF CONSTANTS 


Sal 
SA? 
SAD 
Sau 
SAS 
sae 
sat 
sna 


SAS 


wpoqv 

Ql eIRAAC 
n2e3LAA 
Rye JHANC 
Ae eAHANRCH 
avt7i 
wan 
yprarc 
eeanco: 


ne ene 


DAs2779A  09,03.4A. 


PAGE 


. : : . 
Pt f | a ql ‘ i Y ? 
: ] } 


| ee a ee } : ; po 4 am ae : 
| : = q : 4 4 y ‘ | . 
i ’ i ; 2 a fy ; 


ST-9 


vro : COMPASS 3.5-470, 967277796 09.03.48. PAGE 4 
102030 Two fau WAAC 
102030 THREE fou «el sAcd 
104000 Faun sft aran 
1029000 FIVE set ?L an 

Six toy eae 
? SFVEN ser ’ 
0 EIGHT SFY " 
0 NINE Str f 
te TEN St ia 
me) ELEVEN SET i 
-0 LARGE 2 VIITITIA 


EXAMPLE OF ADDRESS EXPRESSIONS 


5110000006 « SAI TAGS 
23° $120000010 « al TAGOSEVEN 
Surorv7r77rs e« SAI TAG eSEVEN-ELEVEN 
24 6120000000 sR2 NINE 
6120000011 Fd NINE/2¢TEN-ELEVEN/SEVEN 
25 GHeOTTITTID . SA4 FIGHTOENINE 6-4 
Shinooo0s2 « ; : SAI 1°sJoDGISIFE 
26 $110000052 « SAj POsDeLGIS9E 
$11000005)3 © Sal S0CTENCHARCTS 
27 6$10000000 sol 1070 
ENNAUN 
TiAO2STO2ZI Sk6 JHENDS So) ENDRUN at 
30 «620650 Ln6 600 ENDRUN OD 
0100000000 A RJ aXSYSs ENDRUN I 
ENDM ENORUN of 


OEFAULT SYMBOLS DEFINED AY COMPASS. 
OA SYS: 
CONTENT OF LITERALS BLOCK. 


3b 8 7606921200000000000 a5sap 


32 00000000000000000007 6 
33 ODODOHDDODODONNNONNY ry 
34 00000000000000000000 : 

3S 00000000000000003720 ap 
36 «©00000000000000000007 G 
IT 03920 9$61955595955555 AWCe2 . 
40 O00000000V0000N0000F G 
&E 01020 304065555555555 aucor 

42. 00000000000000000002 8 
43 ONDDDANDGVOONHANONONT 6 
4% 01020 99559955559595959 ane 

45 ONDONANDOVONNNADNANS . p 
46 = 01920956 3955555595599 AH 02 

4T NaHoonNDOUHNOONONNOT 6 
59 08920456 355555599559 AHNe2 

Sb LT2UKPZ207TFLTENTSHNAY NU IP LOSKIe 
52. 164134641652361156556 NODG-SRP Ae 


SP 260514091000270 1267) TENCHARCTS 
S54 NNNNDADDOVONNANHNAND 


vFn 
COMPASS 345-470 v 
STORAGE ALLOCATION. ry 6/27/78 09,03.6R~ PAGE | 


ALODRESS LENGTH _ BINARY CONTROL CARNS,. 
n 65 IDFNG VEN 
55 END vEn 
HLOCKS TYPE AVURESS LENGIM 
PROGRAM® LOCAL 0 n 
LITERALS® LOCAL uN 26 


ENTRY POINTS. 


vFn Ive 


EXTERNAL SYMAOLS. 


SYSs 
is ‘ 
vee COMPASS 3.5-470, 04/27/7786 09.03.46R. PAGE 6 
“ 55 END vEn 
i 
n e7TINOA SCM STORAGE USED : Al STATEMENTS 19 SYMAROLS 
MODEL 274 ASSENAL ¥ 0.09) SECONDS 4n REFERENCES 
vro COMPASS 3.5-470, 06727778 09.03.68. PAGE 5 
CRAOR DIRECTORY. 
2 TYPE ERRON ADDRESS ERROR ON SYMBOL DEFINITION. MFF ONAZ-  CYALTS-SNI sLB7/R6B 05/15/78 
OCCURRED ON PAGES ’ 09.03.41.D0N00SR FROM 7H 
09.03.42,1P 000003n6 wOHDS - FILE INPUT ¢ OC ¢ 
7 TyPE ERROR ADDRESS VALUE EXCEEDS FIELD SIZE> RESULT TRUNCATED ©9.03.42.00N. PSNeO21BoTZCTOPIAMILLER ' 
OCCUNRED ON PAGES 26 fr) 09.03.47. COMPASS (LO=55558) 
09.03.48. & WAHNING MESSAGES IN VFO 


09.03.48, ASSEMBLY COMPLETE.  &7300H SCM USED. 
09.03.48. 0.248 CPU SECONDS ASSEMBLY TIME. 
09.03.48.U60. 

09.03.49. ERROR MODE 203. ADDRESS #000190 
09.03.50.0P 00001920 wOROS - FILE OUTPUT « OC 4 
09.03.50.HS 35A& WORDS ¢ 7266 MAX USED) 


09.,03.50.CPA 0254 SEC. 025% ADJ. 
09.03.50.10 0659 SEC. 0659 ADS. 
09.03.50.CN 12.16% MWS. 0742 ADS 
09.03.50.55 1.656 

09.03.50.PP 6.945 SEC. DATE 06/27/76 


09.03.50.E) END OF yOBe SH 


i a SS oe aoe] || ; J ' 


z E : 2 P a : bs “ : rq a : » 


ven COMPASS 3.5-470, 08/7777TA. 09.03,4A, PAGE 6 
SYMRANLIC QEFFOFNCE TALE. 
CHECK] 2c 270? o evo eral 
CURL ET rd PeNGRaNne - 27in rae P7NG 278 
CHrcatt 32 HOOGCH AMS 72715 esa. 
Ercut 0 ; wvo7 n §v2n 
ELEVEN WJ ‘wio n setr w19 
FIVE 1020n0 Woe A 
FATA 1Ns0n0 won 
Lacce Treree? win 
NINE u] 170A O 37a 3719 Isro 
ONF 192030 2/57 
Sam 0 PROGQANE | 2706 1 
SEVEN ? 3706 0 57146 yeair 319 ; % 
SVS 0 FHTERNAL © ean ; 
tac 1 PogGName 270A L 2726 315 RVALY wir 
Tact 10 PPOGIAM® 2724 
Ten itd 3709 0 3719 
THHEE 162030 3702 0 
Two 102030 ywolo 
vo iB) pangRane 2/02 € 2797 t 
. LOAD MAP - vFO CYHER LOADER 1.4-470 067297778 09,03,69. PAGE L 
) 
‘FwA OF THE (O80 wn 
(wae? OF THE LOAN 226 
TRANSFER ANDRESS -- VFO 124 
“PROGRAM ENTRY POINTS == vFO 126 ° 
PROGRAM AND RLOCK ASSIGNMENTS. 
ALOCK ADORESS = LENGTH. FILE =—s-_- Da tE PHOCSSR VER LEVEL HARNWARE COMMENTS 
VFO fat 55 co O472777R COMPASS 3.5 670 
S1¥S.RM 166 40 SL=SYSLIB §=05716778 CUMPASS 3.5 470 PROCESS SYSTEM REQUEST. 


0023 CP SECONDS 13200A CM STNRaGe USED 1 TABLE MOVE 


P - 000000 40 000300 RO 000N00 
Pa 123200 42 000055 AI o00nDl Ciabs= S810 coon 0103 1300 0055 CtAite 9700 0000 0000 0000 0000 


FL 000700 a2 010204 A2 HOOND2 Caer CIAZI= 9000. 0000 0000 0000 000 
e~« 7007tO 4) 000143 Ad O12739 Ctaiye 0000 0000 0900 o0n0 onor Ctajie 

er 00004) Ae 000142 BS 000701 CtAsds 1740 6321 2000 0000 000 CIAe)s 

FE 000000 45 000153 AS 000124 CtASd© 0000 0000 0000 0000 noo? CIRS)® §110 0001 4251 2000 0149 
MA 000800 46 000001 BA 000700 Ctahd® 0000 000. 0000 0000 onn0 Ctnaye 


a? 000001 AF O27756 Cta7Tbe 0000 8000 0000 00n0 0000 CIATI« 
RO ©0000 0000 0000 0000 0000 
md S280 0000 010) 3100 0055 
R2 0000 0000 0000 0000 0000 
nd 0000 0000 0000 0000 o007 
R& 1740 6321 2000 0000 0000 
RS 0000 0000 0000 0000 0002 
R6 2505 1570 0000 0000 006) 
x? 0000 0000 0000 0000 o000n 


00000 00010 00130 00000 00000 00000 0n000 70000 00000 
00054 #56110 01110 00056 54710 Stloo nnool 03110 0005S 64550 02550 00000 46000 00000 00000 00000 00000 
00060 15051 52000 00000 00061 00000 0300 0000 OCnnl 07040 00060 51600 on00} 04000 00063 00000 00022 
00064 14072 70000 00000 00000 00000 O00V0 nONnY 00226 40000 00000 02000 onli! 00000 00000 £0000 00000 
oooro 1407) 75755 00000 00000 00000 oOn000 00000 00000 - 
00100 #54000 00000 o1000 OCOn0! 
C0800 $4000 00000 o1000 00001 00018 S0000 00000 00226 00000 00000 00000 00000 

oO 00104 00000 00000 00000 00226 00000 00000 00000 00000 

! 00110 #26060 £0000 00000 001244 . 00000 00000 90000 00100 07537 LoO711 00000 00000 00251 $3106 18240 S000 

aa Oolls booko $1200 00149 15310. 61114 05000 01003 46000 51200 00144 90000 00010 01000 00000 90005 20030 
00120 00000 00040 61000 46000 $1300 ootl2 olozu 32301 15550 00000 41000 46000 02060 60000 23013 50000 
ool2s $1100 00142 51200 00143 51300 00145 51300 00143 51400 00142 51500 00153 ~ $2210 00055 SI2E0 0203 
00130 52320 80255 51430 10203 51540 20304 51205 13252 61100 10455 61200 10203 62300 20304 S100 CO1T 
00134 52100 00128 SEI00 00506 61200 00000 41200 008! 6140? TITT3 S1100 00163 SI100 00163 51100 00164 
00140 61100 00000 71602 4702) 20650 01000 00170 46000 17406 32120 00000 00000 00000 00000 00000 00007 
00144 00000 00000 d0000 Coco! 00000 00000 n000U 00000 00000 00000 00000 03720 ~~ 00000 00000 00000 00007 
06150 01020 35695 $5555 55555 00000 On000 0000 00007 01020 30406 55555 55555 00000 00000 00000 00002 
00156 00000 00000 voo000 00007 _ 01020 35555 55555 55555 00000 00000 00000 000046 01020 35635 55555 55555 
00160 00000 00000 00000 00007, 01020 45435 55559 55555 17216 22077 17403 5606) 16613 46165 23633 56556 
00166 240518 60310 01220 I2a2)3 00000 09900 aonnD 00000 56110 20123 03310 00167 04000 00173 61000 46000 
00170 0400% 00170 61000 %6000 51100 000018 03810 O07) 54610 04000 00167 46000 — 51100 00066 03310 001375 
00176 51100 00166 04000 00176 TAIQM 00150 20160 46000 13668 13161 1366) 46000 $1600 00167 106112 46000 
00200 511300 00001 01000 00166 20652 01000 00170 46000 S1100 00003 03110 on202 04004 00203 61000 «6000 
00206 521100 00001 03110 00203 T1602 203146 N4000 00201 20150 36662 03000 00170 04008 00207 63000 46000 
00210 %I602 20314 20452 36462 S3tKgo 20873 03310 ON207 03010 00207 S1100 00001 03110 GOZIT 7RI00 C0008 
00214 04000 00206 61000 #6000 71603 24616 12661 20651 01000 00170 61000 44000 04004 00217 61000 46000 
00220 713660 20630 22161 7Ie10 20327 03210 90215 20151 13116 20636 51600 o0225 74660 36316 20123 46000 


00226 04000 00215 61onn 46000 00000 00000 70000 00000 £0000 00000 04004 on226 60000 00000 04004 00227 
00230 60000 00000 04004 00730 


: - 7 . a . 2 i - = . ; 


Lesson 7 


‘Pseupo OPERATIONS 


Lesson Preview: 


THE LESSON COVERS SOME OF THE BASIS PSEUDO OPERATIONS 
USED IN ADDING COSMETIC EFFECTS TO A LISTING, ALSO 
SOME OF THE BASIC PSEUDO OPS USED IN NORMAL PROGRAM- 
MING PRACTICES WILL BE COVERED, 


REFERENCES: 


CHAPTER 4 Compass REFERENCE MANUAL #60492600 


Training Arps: 
VISUAL SET 7 


PROJECTS: 


OBJECTIVES: 


AT THE COMPLETION OF THE LESSON THE STUDENT WILL BE 


- ABLE TO: 


1, WRITE A PROGRAM USING GOOD DOCUMENTATION TECH- 
NIQUES, | 

2, USE PSEUDO OPERATIONS THAT WILL ALLOW FOR WRITING 
MEANINGFUL EFFECIENT PROGRAMS, 


PSEUDO INSTRUCTION 
STORAGE ALLOCATION. 


ADDRESS 
0 
2 


LENGTH 
2 


COMPASS 3.6-476.6 01/09/79 06.34.39. 
BINARY CONTROL CARDS. 
IDENT TITLE 
END = TITLE 


ENTRY POINTS. 
TITLE Oe 


EXTERNAL SYMBOLS. 


_SYS# 


PAGE 


i 


PSEUDO INSTRUCTION 


E~ZL 


0100000000 X 


COMPASS 346-4764 01709779 086346396 _ PAGE 


IDENT TITLE 
ENTRY TITLE 
LIST $s 


SHHHEHEOHHRHEHHSHEHEHHHREHORAHHHOHHHEREHTHHSHREHHRHHHHHHORHHEHHERSEANAHHS 

e 
TITLE-ASSEMULY LISTING TITLE ° 

e 
THE FIRST TITLE PSEUDO INSTRUCTION ESTABLISHES THE TITLE THAT® 
WILL BE PRINTED ON EACH PAGE OF THE LISTING. A SUBSEQUENT ® 
TITLE INSTRUCTION GENERATES A SUBTITLE AND CAUSES A PAGE EJECT. 
If THE SUBPROGRAM DUES NOT INCLUDE A TITLE INSTRUCTION» COMPASS 
PRINTS THE VARIABLE FIELO OF THE FIRST IDENT PSEUDO INSTRUCTION. 
AS THE TITLE. A TETLE INSTRUCTION WITHOUT A CHARACTER STRING® 
PROUUCES AN UNTITLED LISTING. A NAME IN THE LOCATION FIELD ® 
INTRODUCES A NEW SUBPROGRAM SUB-TITLE. 


seeseeseseee e282 


*LOCATION OPERATION VANIABLE-SUUFIELDS 

e . 

*NAME TITLE «= STRING. ; 

NAME NEW SUBPROGRAM SUB-SUBTITLE TO BE PRINTED IN CHARACTER 


POSITION 70-79 ON THE SECOND LINE OF THE PAGE. A BLANK 
NAME CLEARS THE SUB-SUBTITLE. 


STRING CUMPASS SEARCHES THE COLUMNS FOLLOWING THE SLANK THAT TERM~ 
INATES THE OPERATION FIELO. IF IT DOES NOT FIND A NONBLANK 
CHARACTER BEFORE THE DEFAULT COMMENTS COLUMN (SEE COL IN- * 
STRUCTION)»: 11 TAKES THE CHARACTERS STARTING WITH THE DE- ® 
FAULT COMMENTS COLUMN MINUS ONE UP TO THE END OF THE STATE- 
MENT. OTHERWISEs THE TITLE OR SUBTITLE BEGINS WITH THE ad 
FIRST NONBLANK CHARACTER FOLLOWING TITLE ANO CONTINUES TO ® 
THE END OF THE STATEMENT OR TO 62 CHARACTERS. ANY CHARACT~- 
ERS BEYOND THE 62ND ARE LOST. A BLANK STRING PRODUCES AN ® 
UNTITLED LISTING. * 


eeeseveveeee 8ese eee 88 


° 
SOORP HFEF OREO EOROHHORHRERHRTHHREREOHETERERTHERSHDERRHEHHOHREHHEHEH HAD 

TITLE NO 

ENDRUN 

SX6 JREND*401 : ENDRUN 
LXxX6 400 ENDRUN 
RJ 2XSYS= ENORUN 
ENDM ; ENDRUN 


TITLE PSEUDO INSTRUCTION 
PROREHORED EHO HO TENTOODHEHEHERH UH OEHHSHHOHEREHREORSCORHEHERHREOHEH ERED NES 


IDENT=-SUBPROGRAM IDENTIFICATION 


AN IDENT PSEUDO INSTRUCTION OF THE FOLLOWING FORM IS THE 
FIRST STATEMENT OF A SUBPROGRAM RECOGNIZED BY THE ASSEMBLER, 
USUALLY» ANY LINE PRECEDING THE FIRST IDENT OR BETWEEN AN END 
AND IDENT AffE ASSUMED TO BE COMMENTS. HOWEVERs WHEN COMPASS 
HAS BEEN CALLED BY SOME OTHER LANGUAGE PROCESSOR SUCH AS 
FORTRANs THE ASSEMBLER RETURNS CONTROL TO THE PROCESSOR WHEN 
THE STATEMENT FOLLOWING END {£S NOT IDENT. FOH A RELOCATABLE 
SUBPROGRAMs COMPASS FLAGS ANY SUBSEQUENT USE OF IDENT BEFORE ¢ 
END AS AN ERROR. FOR AN ABSOLUTE SUBPROGRAMs A SECOND FORM OF 
IDENT DESCRIBED UNDER BINARY CONTROL IS AVAILABLE FOR OVERLAY® 


@eeeeoeseee2e8 28 


PSEUDO INSTRUCTION COMPASS 3.6-476,. 01/09/79 06.34.39. PAGE 3 


Z 


« GENERATION. bd 
: THE FORMAT OF IDENT VARIES ACCORDING TO THE TYPE oF ASSEMBLY.® 
id CPU RELOCATEABLE FORMAT! 

“LOCATION OPERATION VARIABLE-SUBFIELDS 

: IOENT NAME 

v4 CPU ABSOLUTE FORMAT 

*LOCATION OPERATION VARIABLE~SUBFIELOS 

: IDENT NAME sORIGINSENTRYeL I L2 


7600 PPU ABSOLUTE FORMAT! 
LOCATION OPERATION VARIASBLE-SUBFIELDS 
IDENT NAME eORIGINSENTRY ePPU 
6000 SERIES PPU ABSOLUTE FORMATS 
LOCATION OPERATION VARIABLE-SUBFIELDS 
IDENT NAMEsORIGIN 
NAME NAME OF THE SUBPROGRAM OR OVERLAYe THE PARAMETER 15S 
REQUIRED. FOR A CPU RELOCATABLE OR ABSOLUTE ASSEMBLY?e 


NAME CAN BE 1-7 CHARACTERS» OF WHICH THE FERST MUST BE 
ALPHABETIC (A-Z) AND THE LAST MUST NOT BE A COLON. 


v-2 


-FOR A CYBER T0/MODEL 76 OR 7600 PPU ASSEMBLY» NAME CAN 
HE 1-7 CHARACTERS. FOR A CYBER 70/MODEL 72073874 OR 600 
“SERIES PPU ASSEMBLY NAME CAN BE l-3 CHARACTERS. IN 
EITHER CASEs THERE IS NO RESTRICTION ON THE FIRST 
CHARACTER» HUT THE LAST CHARACTER MUST NOT BE A COLON. 


ORIGIN AN EXPRESSION SPECIFYING THE FIRST WORD ADDRESS OF THE 
ABSOLUTE PROGRAM OR OVERLAY. THE OVERLAY LOADER TABLE 
AND ALL CODE ASSEMBLED STARTING AT THIS ADDRESS AND 
ENDING WITH THE NEXT SEGMENT» NONHLANK IDENT, OR END 
INSTRUCTION COMPRISES THE OVERLAY. FOR A SINGLE ENTRY 
PUINT CPU PROGRAM ADDRESS FOR THE OVERLAY IS ORIGIN-1e 
THE WORD AT ORIGIN~1] IS OVERLAYED HY THE SO(OCTAL) LOADER 
CONTROL TABLE. FOR A MULTIPLE ENTRY POINT CPU PROGRAM» ® 
THE LOAD ADDRESS FOR THE ABSOLUTE OVERLAY IS ORIGIN-WC-l» 
WHERE WC IS THE NUMBER OF ENTRY POINTS IN THE SIUOCTALD ® 


e 
e 
e 
° 
° 
e 
° 
e 
* 
« 
e 
e 
* 
® 
® 
° 
« 
e 
s 
e 
® 
* 
e 
« 
e 
e 
® 
® 
* 
* 
° 
0 
e 
® 
° 
e 
* 
« 
t 
* 
° 


s 
. 


LOADER TABLE. aie 

. ° 
FOR A PPU SUBPROGRAMs THE LOAD ADDRESS IS ORIGINS. ° 
FIVE 12-BIT PPU WORDS ARE OVERLAYEO BY THE 60-BIT LOADER® 
TABLE. ° 


OATA CAN -BE GENERATED IN LOCATIONS STARTING WITH ORIGIN ® 
AND AUOVEs BUT NOT BELOW ORIGIN. THE ORIGIN SUBFIELD 7 
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PSEUDO INSTRUCTION : COHPASS 3.6-476, 08/09/79 66.34.39. PAGE 4 


DOES NOT SERVE THE SAME FUNCTION AS ORG NOR DOES IT ® 
REPLACE ORG FOR SETTING THE ORIGIN COUNTER. . 
* 


IF THE ORIGIN FIELD IS NULL FOR AN ABSOLUTE SUBPROGHAN. 
THE ASSEMBLER USES ADDRESS 000000 RAIS) AS THE ORIGIN  « 
FOR A CPU PROGRAM AND 0000 AS THE ORIGIN FOR A PPU PROG.e 

i] 
FOR A RELOCATAULE SUBPROGHAMs THE SUBFIELD 1S IGNORED...° 
THE LOADER AUTOMATICALLY HELOCATES THE FIRST SUUPROGNAM ® 


TO BE LOADED STARTING AT RAS) *LOOCOCTAL) © THE SECOND e 
SUNPROGIAM STARTING AT THE FIRST AVAILABLE LOCATION ° 
FOLLOWING THE FIRST SUUPROGRAMs ETC. ° 
| * « 
| ENTRY FOR A CYDER TO/MODEL 76 OR 7600 PPU ASSEMNLY OR FOR AN ® 


AUSOLUTE CPU ASSEMBLYs THIS SUUFIELD CONTAINS AN EXPRES-8 
SION SPECIFYING THE SUNPROGRAM ENTRY ADDRESS WHICH CAN @ 
BE SYMBOLIC. ° 
: Ss 
Liet2 ABSOLUTE EXPRESSIONS SPECIFYING THE LEVEL NUMBERS OF THE® 
OVERLAY. 2 1S THE PRIMARY LEVEL(0-63) AND L2 1S THE» 
SECONUARY LEVEL (0-63). WHEN THE FIRST IDENT LOENTIFIES® 
THE HAIN OVERLAYs LI AND L2 CAN BE OMITTED. IF LI IS) ® 
OMITTEDs IT 1S SET TO 00. IF L2 IS OMITTEDs JT IS SET 
TO 00. 


e 
e 
; e 

BECAUSE THE FIRST IDENT PRECEDES ANY USE OF THE BASE @ 
PSEUDO INSTRUCTIONs THE LEVEL NUMBERS ON THE IDENT ARE © 
e 

e 

* 


S-2 


EVALUATED AS DECIMAL UNLESS SPECIFICALLY DESIGNATED AS 
OCTAL BY A POST RADIX. . 


peu ABSOLUTE EXPRESSION SPECIFYING THE NUMBER OF THE PPU ON © 
WHICH THIS PROGRAM IS TO BE LOADED. ON THE FIRST LOENTs® 

THIS NUMBER 1S EVALUATED AS DECIMAL UNLESS SPECIFICALLY © 
DESIGNATED AS OCTAL. ; ° 

. * 

A LOCATION FIELD SYMBOL» IF PRESENT» IS IGNORED. ° 

° 

L bebahhetbt ddd dd dd ddd di ddd iti titi iLL LiLitrirrirriliviriririririyirry) 


PSEUDO INSTRUCTION 
. COMPASS 3.6-476. 
SPACE PSEUDO INSTRUCTION, A123456709 poe, MUONS AGE ce 


AL23456769 TITLE SPACE PSEUDO INSTRUCTION. 


PSEUDO INSTRUCTION , COMPASS 326-4766 01/09/79 08.34.39. PAGE 5 
SPACE PSEUDO INSTRUCTION. A123456789 


Al23456769 TITLE SPACE PSEUDO INSTRUCTION, 


PSEUDO INSTRUCTION ead COMPASS 326-476. 01/09/79 06.34.39. PAGE 6 
EJECT PSEUDO INSTRUCTION . : , 


fake) EJECT PSEUDO INSTRUCTION 


altel Wallaby abba TTT T TTY TTT TTT TTP ere yyy 
EJECT-EJECT PAGE AND BEGIN NEW SUB-TITLE 


THE EJECT PSEUDO INSTRUCTION ADVANCES PRINTER PAPER 10 A NEW 
PAGE BEFORE PRINTING. THEN» PAGE HEADINLS ARE PRINTED AND 

LISTING CONTINUES. EJECT HAS NO EFFECTeOTHER THAN SETTING THE 
«, SUB-SUBTITLEs IF IT IS GENERATED BY “DUP sECHOsRHTeXTEXT"» OR @ 
* A MACRO OR OPDEF EXPANSION, AND THE CORRESPONDING "LEST! 


e 
« 
J 
e 
« 
« 


a . OPTIONS ARE NOT ALL SELECTED. 
a “LOCATION OPERATION VARIABLE-SUBFIELDS _ 
NAME EJECT 
: 


CHARACTER POSITIONS 70-79 OF THE SECOND LINE OF THE PAGE. A 
BLANK NAME CLEARS THE SUB-TITLE, 


* 
e 
eo 
° 
® 
« 
NAME NEW PROGRAM SUB-SUBTITLE FOR THE PAGE WILL BE PRINTED IN © 
® 
e 
r 

AN ENTRY IN THE VARIABLE FIELOs IF PRESENTs 1S IGNORED. e 
F e 

a 


alee LILI LIL ITLL TT TT TTT TTT TTT PTT Trey Pers 
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PSEUDO INSTRUCTION : GEO RS COMPASS 3.6+476. OL709779 082346396 PAGE 7 
EVECT PSEUDO INSTRUCTION : ‘ TEJECT 


i 
tevect /’ EVECT ; 
OPTI IIIT IIIT iirirtiiriiiiiiiiririiiiritiiiitiri ty 
e e 


““TIL-NEW ASSEMBLY LISTING TITLE r) 


, e 
THE “TTL PSEUDO INSTRUCTION INTRODUCES A NEW MAIN TETLE TO BE 
PRINTED ON EACH PAGE OF THE LISTINGs AND CLEARS THE SUBTITLE.® 
e 


LOCATION OPERATION VARIABLE-SUBFIELDS 


e 

e 

e 

« 

* 

* 

e 

*NAME TTL STRING 

e ° 

« STRING COMPASS SEARCHES THE COLUMNS FOLLOWING THE BLANK THAT TER-@ | 
° MINATES THE OPERATING FIELD. IF IT OOES NOT FIND A NONBLANK 
° CHARACTER BEFORE THE DEFAULT COMMENTS COLUMN (SEE COL PSEUDO 
* INSTRUCTION)» IT TAKES THE CHARACTERS STARTING WITH THE DE- 
Se FAULT COMMENTS COLUMN MINUS ONE UP TO THE STATEMENT END. © 

. OTHERWISE ® THE TETLE BEGINS WITH THE FIRST NONHLANK CHARACTER 
° FOLLOWING "TIL" AND CONTINUES TO THE END OF THE STATEMENT © 

* OR TO THE 62ND CHARACTER. ANY CHARACTER BEYOND THE 62ND * 

° ARE LOST. A BLANK STRING PRODUCES AN UNTITLED LISTING. ® 
* : * 
® NAME NEW SUB-SUBTITLE TO BE PRINTED IN CHARACTER POSITION 70-798 
e ON THE SECOND LINE OF THE PAGE. A BLANK NANE CLEARS THE ®& 
° SUB-SUBTITLE. 

e 

J 

® 

a 


° 
; « 

“TTL" DOES NOT CAUSE A PAGE EJECT. bed 
: ° 

° 
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PSEUDO INSTRUCTION COMPASS 3.6-476. 02/09/79 08.34.39. PAGE 8 
EJECT PSEUDO INSTRUCTION ' 


EJECT 
‘MILLER FIL TTL PSEUDO INSTRUCTION 


NOREF = OMIT SYMBOL REFERENCES 


THE "NOREF* PSEUDO INSTRUCTION CAUSES THE SYMBOLS NAMED IN THE 
VARIABLE FIELO TO BE SUPPRESSED FROM THE SYMBOLIC REFERENCE TAGLE. 


*®LOCATION OPEHATION VARIABLE SUDFIELOS 
. ; 
* NOREF SYME oSYM2ececveeSVHN 


° 

* SYMI ONE OR MOHE SYMBOLS DEFINED IN THE SUBPROGRAM. IF A 
« SYMBOL QUALIFIER IS IN EFFECT WHEN THE "NOREF" IS ENCOUNTER= 
« ED» THE SYMBOLS ARE ASSUMED TO BE QUALIFIED BY THE QUALIFIER 
* IN USE, ALTERNATIVELYs SYMI CAN BE A NON-OLANK QUALIFIER 
° SYMBOL ENCLOSED BY SLANT BARS» /QUALIFIER/» IN WHICH CASE 
e ALL SYMBOLS QUALIFIED BY THE SPECIFIED QUALIFIER ARE 
e ‘ 
e 
« 
© 
° 


e 

e 

SUPPRESSED FROM THE SYMBOLIC REFERENCE TABLE. e 

¢ 

A LOCATION FIELD FIELD SYMBOL» IF PRESENTs IS IGNORED. * 
® 
bbheheddbhededde edd ddd ether titi tite Lili ri LiL i itt iiiyilrriviririryyTrryyiy 


PHPIOREHHRHOHEOHHHEEREEHHORHEHTEHRORHEEEEHEEHREROHEHEEHRHURDHDDORHOEOEEE 


~J * e 

f * USE-ESTABLISH ANO USE BLOCK bd 

[oo] * : : ° 
° USE ESTABLISHES. A NEW BLOCK OR RESUMES USE OF AN ALREADY e 
° ESTABLISHED BLOCK. THE BLOCK IN USE IS THE BLOCK INTO WHICH ® 
« CODE IS SUBSEQUENTLY ASSEMBLED. A USER MAY ESTABLISH UP TO @ 
* 252 BLOCKS. id 
« ) 
®LOCATION OPERATION VARIABLE-SUBFIELOS e 
° e 
° USE BLOCK . 
® « 
*® BLOCK IDENTIFIES BLOCK TO BE USED» AS FOLLOWS: * 
* : : « 
Ad 0 OR BLANK NOMINAL BLOCK (ABSOLUTE OR ZERO) . * 
. 4/ BLANK COMMON BLOCKs FOR A RELOCATABLE SUBPROGRAMs 
* THIS BLOCK CANNOT CONTAIN DATA. THE ONLY STORAGE 
« ALLOCATION INSTRUCTIONS © 1AT CAN FOLLOW ARE BSS ® . 
° AND ORG. THE 8SSZ INSTRUCTION JIS ILLEGAL BECAUSE 
id IT PRESETS THE BLOCK TO ZEROS. ; ® 
e r 
« JNAME/ LABELED COMMON BLOCK. A NAME CAN BE A MAXIMUM @ 
bad OF 7 CHARACTERS AND CANNOT INCLUDE BLANK OR COMMA. 
* THE FIRST AND LAST CHARACTERS MUST NOT BE A COLON 
* CONVENTIONS IMPOSED BY THE LOADER OR OTHER ° 
e ASSEMBLERS OR COMPILERS COULD FURTHER RESTRICT ® 
® THE USE OF NAMES. ba 
« e 
« NAME LOCAL BLOCK. A NAME CAN BE 1-8 CHARACTERS» bad 
® « 


 FRCLUOTNG @LANK OR COMMA. USE OF THIS NAHE 


TTL PSEUDO INSTRUCTION COMPASS 326-4764 01/09/79 08.34.39. PAGE 9 


MILLER 
° ENCLOSED BY THE BRACKETS DOES NOT CAUSE THE BLOCK 
o- TO BECOME A LABELED COMMON BLOCK. FOR EXAMPLE» © 
° USE A AND USE /A/ ARE DIFFERENT BLOCKS. . 
. 3 * 
. ° BLOCK IN USE PRIOR TO CURRENT USEsUSELCMs ORG: one 
° ORGC. 
° : a ° 
° A LOCATION SYMBOL» IF PRESENT» IS IGNORED. e 
* . e 
OOMOEHHOHHEDOTEDESEHOOOHONUOESHE HORNE DREHHETHHEFENEOORHREDONONEOHEREROE 

2 USELESS—BSS 0 
USELESS “wonee AUseLess THIS SYMBOL SHOULD NOT OCCUR IN THE SYMBOLIC 
REFERENCE TAULE 


SPACE 20 


Ser Cn er ren eer enn ne rr man onne eee ane Rees ease seeeeee 


 ] e 
° SPACE-SKIP LINES AND BEGIN NEW SUB-TITLE ® 
e * 
° THE "SPACE" PSEUDO INSTRUCTION SPACES THE ASSEMBLER LISTING. @ 
° WHEN A PAGE IS FULL» AN EJECT OCCURS AND LISTING RESUMES ON THE 
° NEXT PAGE. A SPACE IMMEDIATELY FOLLOWING AN "EJECT! IS 1G- -* 
° NORED. "SPACE" HAS NO EFFECT» OTHER THAN SETTING THE SU8-SUB- 
e TITLEs IF IT IS GENERATED BY "UUPe ECHOs RMTs XTEXT%»s OR A ®@ 
« MACHO OR OPDEF EXPANSIONs AND THE CORRESPONDING “LIST™ OPTIONS 
* ANE NOT ALL SELECTED. « 
* e 
“LOCATION OPERATION VARI ABLE-SUBFIELDS « 
e : fn e 
*NAME SPACE SCNT *RCNT . 
° € 
° NAME NEW SUBPROGRAM SUBTITLE WILL BE PRINTED IN CHARACTER 70-79 ON 
° THE SECOND LINE OF THE NEXT PAGE HEADING. A BLANK NAME CLEARS | 
° THE SUB-SUUTITLE. * 
e e 
* SCNT AN ABSOLUTE EXPRESSION SPECIFYING A POSITIVE INTEGER NUMBER ® 
° OF SPACES BETWEEN THE MOST RECENT LINE AND THE NEXT LINE OF ® 
® PHTATOULs TF BASE IS Me SCNT IS ASSUMED TO BE DECEMAL, fF ® 


TTL PSEUDO INSTRUCTION COMPASS 3.6~476. 01/09/79 06634.39. PAGE 10 


« SCNT IS OMITTED OR ZERO» NO LINE IS SKIPPED. ° 
e e 
® RCNT AN ABSOLUTE EXPRESSION SPECIFYING A POSITIVE INTEGER NUMHER ® 
« OF LINES THAT MUST BE REMAINING ON THE PAGE FOLLOWING SPACING. 
° IF BASE IS My RCNT IS ASSUMED TO BE DECIMAL. 

° e 
° IF SCNT ¢ RCNT EXCEEDS THE NUMBER OF LINES ON THE PAGE BEFORE 
. SPACING OCCURS» THE “SPACE ACTS LIKE AN "EJECT", NOTE THAT® 
« EITHER. THE EJECT OCCURS OR THE NUMBER OF SPACES ARE SKIPPED ® 
e ® 
. BLANK CARDS CAN ALSO BE USED TO SPACE THE LISTING. ° 
e : e 
SPHSHSHHSHSHHAHSHSHKHHHKHHHHKHEHAHHHHHHHHKHEGHHEHHKAHHHHKRHKHHHHHHHHHCAEHAVHHHACEHO 


SPACE 10030 


SHPHHHHHFHHHHOHEHHEKHEKRHKHKRHHKHHHFEHEHHEHHORVEHHHEHHOHHOKEHHHHHEHHEEAHGHHEREHEEEEEEe 


MREF ~ REFERENCE SYMBOLIC ADORESS 


THE "XREF* PSEUDO INSTRUCTION PROVIDES THE OPTIONS OF HAVING THE 
SYMBOLIC REFERENCE TABLE CONTAIN REFERENCES TO SYMBOLS ACCORDING TO 
(1) LOCATION COUNTER ADDRESS 

(2) PAGE ANO LINE NUMBER 

(3) BOTH 

FOR THE FORMAT OF THE SYMBOLIC REFERENCE TABLE REFER TO SECTION 11.8. 


LOCATION OPERATION VARIAGLE SUBFIELDS 
XREF STRING 


STRING AN OPTIONAL CHARACTER STRINGe THE FIRST CHARACTER OF WHICH IN- 

DICATES HOW SYMBOLS ARE TO BE REFERENCED. 

A THE SYMHOLIC REFERENCE TABLE LIST ADORESSES ONLY. FLAGS ARE 
NOT INCLUDED. 

B THE SYMBOLIC REFERENCE TABLE LISTS REFERENCES TO SYMBOLS ACCORD 
ING TO PAGE NUMBER» LINEs AND ADDRESS. FLAGS ARE INCLUDED. 

P THE SYMBOLIC REFERENCE TABLE LISTS REFERENCES TO SYMBOLS 
ACCORDING TO PAGE AND LINE NUMBER. FLAGS ARE INCLUDED. 


eeseeosvpiesesoeoeeseeoe2seee2eees os 8 


A LOCATION FIELD SYMBOL IF PRESENTs IS IGNORED. 

° 
IF THE STRING IS OMITTED OR IF NO XREF IS ISSUEOs THE SYMBOLIC REFERENCE® 
TABLE CONTAINS REFERENCES ACCORDING TO PAGE AND LENE NUMBERS AND INCLUDES 
FLAGS. THE LAST XAEF ENCOUNTERED IN A SUBPROGRAM DETERMINES THE FORM oF 
THE LISTING FOR THE ENTIRE SUBPROGRAH. 


COROOHHESHSAHOTOERHEHOOTCHEHHAHAHHEHUHEHERHOEHHEEHEHDHOEAHHOSCHHARHEREOHEHREHEROLOS 


USELESS XREF BOTH PAGE NUMBERS LINEs AND ADDRESS SHOULD BE LISTED. 
f ° 


seesespesneveeese eee senuseeessesee 88 


é 
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TIL PSEUDO INSTRUCTION - COMPASS 3.6-476. 01/09/79 00034e39 PAGE 1) 
NOTE THIS IS A NEW TITLE 


TITLE NOTE THIS IS A NEW TITLE. 


TTL PSEUDO INSTRUCTION COMPASS 326-476. 01/09/79 08034639. PAGE 13 


NOT SELECTED» THE "CTEXT* DOES NOT AFFECT TITLING. 


® 

° 

° THE SUBTITLE BEGINS WITH THE FIRST NONBLANK CHARACTER FOLLOWING 
° "CTEXT" OR IN THE DEFAULT COMMENTS COLUMN (SEE COL PSEUDO IN~ 
° STRUCTION) MINUS ONE» WHICHEVER COMES FIRST» AND CONTINUES TO THE® 
* 
e 
e 
e 


eeses 


END OF THE STATEMENT OR 10 62 CHARACTERS. ANY CHARACTER BEYOND ® 

THE 62ND CHARACTER ARE LOST. ° 

° 
ORENOREOEHDEDEO HEH DEEHERTCHEDONEDENVENREETEDOREAEERENEOHODEFOOOREREDEEEHOEEOR OS 


SPACE 10 


TT-Z 


COMMENT NOTICE WHAT THIS COMMENT DOES TO THE PREVIOUS COMMENT 
SPACE 2 : 


ibehhehhdedehh ddd ddd dedi nti e tii Titi LILI LITT iTiTitirrririrrrrrrrrrrryris 


® . e 
° ENDX = DISAULE LISTING OF COMMON DECK TEXT ° 
* ° 
. THE ENDX PSEUDO INSTRUCTION CLEARS THE "XTEXT" FLAG FOR LIST CONTROL © 
° AND CAUSES LISTING TO RESUMEs STARTING WITH THE INSTRUCTION AFTER — ® 
. "ENDX"» WHEN THE X LEST OPTION HAS BEEN SELECTED. ° 
» e 
*LOCATION OPERATION VARIABLE SUBFIELOS ; 
e : * 
° ENDX a. ° 
° ‘ e 
° ENTIRES IN THE LOCATION FIELD OR VARIABLE FIELD» IF PRESENTs ARE IGNORED. 
* * 
* 


POOOHEHHHDERHEDEOHHERHHONERERHHEOEHSEHOTEROHUOEEORHEROHOHEREHENERORRREDEROHONES 


OEFAULT SYMBOLS DEFINED BY COMPASS. 


ox SYS= 
2 : END TITLE 
475008 CM STONAGE USED 432 STATEMENTS 4 SYMBOLS 
MODEL 74 ASSEMBLY 0.949 SECONDS 4 REFERENCES 


TTL PSEUDO INSTRUCTION COMPASS 3.6-476. 01/09/79 08.34.39. PAGE 12 


COMMENT=PREFIX TABLE COMMENT e 


e 

e 

* 

« THE COMMENT PSEUDO INSTRUCTION INSERTS THE CHARACTER STRING « 
« SPECIFIED IN THE VARIABLE FIELD INTO THE EIGHTH THROUGH FOUR-« 
° TEENTH WORD OF THE PRFX TABLE IN THE OBJECT PROGRAM. THE ° 
« PREFIX TABLE® AND THUS THE COMMENT» IS IGNORED BY THE LOADER @ 
° BUT IDENTIFIES THE SECTION. IF A SUBPROGRAM CONTAINS MORE # 
° THAN ONE COMMENT INSTRUCTION» THE NEW COMMENTS ARE APPENUED @ 
e 

° 
a 


RUCTION IS MEANINGLESS. COMMENT INSTRUCTIONS FOLLOWING SEG & 
AND BLANK IDENT PSEUDO INSTAUCTIONS ARE IGNORED WITHOUT NOTI<® 
FIGATION. ° 
LOCATION OPERATION VARTAULE-SUBFIELDS 


COMMENT STRING 


° 

e 

° 

e 

e 

° 

. ; 

* STRING COMPASS SEARCHES THE COLUMNS FOLLOWING THE BLANK THAT TERM- 

+ ; INATES THE OPERATION FIELD. IF IT DOES NOT FIND A NONBLANK 

* CHARACTEK BEFORE THE DEFAULT. COMMENTS COLUMN (SEE COL PSEUDO 

* INSTRUCTION)» IT TAKES THE CHARACTER STARTING WITH THE DE~@ © 

° FAULT COMMENTS COLUMN MINUS ONE. OTHERWISE» THE CHARACTER® 

° STRING BEGINS WITH THE FIRST NONBLANK CHARACTER FOLLOWING @ 

Ld THE OPERATION FIELD. IN EITHER CASE» THE LAST CHARACTER @ 

Ad OF THE STRING IS THE LAST NONBLANK CHARACTER OF THE STATE-@ 

* MENT. 2 TO 10 BLANKS ARE APPENDED ON THE RIGHT SO THAT THE 

« STRING 1S’ FOLLOWED BY AT LEAST ONE BLANK ANO THE LENGTH OFe 

° THE STRING IS A MULTIPLE OF 10 CHARACTERS. IF THE VARIABLE 

° AND COMMENTS FIELDS ARE ALL BLANKS» THE STRING CONSIST OF © 
10 BLANKS. IF THE STRING LENGTH IS MORE THAN 70 CHARACTERS 
ALL CHARACTERS BEYOND THE 70TH ARE LOST. ; Ad 


cT-L 


e 

A LOCATION SYMBOL» IF PRESENT» IS IGNORED. * 

e 

lalate T TLE T TT TTT TTT TTT T ere 


COMMENT THIS EXAMPLE ILLUSTRATES THE TITLE = TIL =. SPACE =~ COMMENT ee 
op eeeee nee neeeseneeueneeanenneuenesoeuneasensneneneeeesdetavesenoticnnnniess 


seseesee 


* . ® 
° CTEXT ~ ENABLE LISTING OF COMMON DECK TEXT ° 
e e . 
° THE CTEXT PSEUDO INSTRUCTION SETS THE XTEXT FLAG FOR LIST CONTROL, 
* @ 
. NOTES WHEN THE FLAG IS SET» EXTERNAL TEXT. IS LISTED ONLY IF THE X LIST 
° OPTION IS SELECTED. . 
e @ 
“NAME OPERATION VARIABLE SUBFIELDS e 
=) . e 
. NAME IF X LIST OPTION IS SELECTEDs NAME(OPTIONAL) IS TREATED AS A Sup- @ 
« SUBTITLE» OTHERWISE IT 1S IGNORED, « 
e ® 
° STRING IF THE VARIABLE FIELO IS NONBLANK AND THE X LIST OPTION Is ° 
. SELECTEDsTHE MCTEXT® IS TREATED AS A SUBTITLE. THE “CTEXT® IN= © 
° STRUCTION GENERATES A SUBTITLE AND CAUSES A PAFE EJECT. IF x Is @ 


i ae 


TTL PSEUDO INSTRUCTION 


COMPASS 3.6476. 02/09/79 08.34.396 PAGE 14 
SYMBOLIC REFERENCE TABLE, , 
SYS= 0 EXTERNAL® 2st 1 
TITLE 0 PROGRAM 2/02 € Oe 2737 L 0 
USELESS 2 PROGRAN® WILL 2 
LOAD MAP = TITLE CYBER LOADER 1.4-485 02709779 00034.416 | PAGE 1 
FWA OF THE LOAD 11 | 
LWAel OF THE LOAD 153 
TRANSFER ADDRESS <= TITLE lll 
PROGRAM ENTRY POINTS == TITLE 1 
PROGRAM AND BLOCK ASSIGNMENTS. 
BLOCK ADDRESS LENGTH FALE DATE PROCSSA VER LEVEL HARDWARE COMMENTS 
TITLE 1 2 60 01/09/79 COMPASS 3.6 476 THIS EXAMPLE ILLUSTRATES THE TITLE = TIL - spac 
CPU.SYS 113 40 SL-SYSLIB 11/15/78 COMPASS 3.6 476 PROCESS SYSTEM REQUEST. 


0060 CP SECONDS 


08.34.34.I1P 00003584 WORDS ~ FILE INPUT » DC 04 
0834634.V0NeTS. 001As668321896eMILLER 
06.34.37 REWIND eOUTPUT. : 

. 08.234.38. COMPASS. 3 . F 
08.34.41, ASSEMULY COMPLETE. 475008 CM USED. 
08.39.41, 1.075 CPU SECONDS ASSEMULY TIME. 
08.34.4).LG0, : 
08.34.42.0P 00005696 WORDS = FILE OUTPUT » DC 40 
08.34.42.MS 7168 wORODS (¢ 10752 MAX USED) 
06.34.42.CPA 1.172 SEC. Lel72 ADS. 
08.34.42.CPY 0057 SEC. eU5T ADJ. 
086.34.42.10 0436 SEC, 0436 ADJ. 
08.34.42.CM 35-401 KWS, . 2.165 ADJ. 
06.34.42.55 3.832 2 
08.34.42.PP 2.850 SEC. DATE. 01709779 


135008 CM STORAGE USED 


MFS NUl- CYB7T4-SN108 5C/ROB 41714/78 


06.34.34.D00N004U FROM 70H 


06-34.42.EN END OF JOBe OH 


2 TABLE MOVE 


COMPASS 325-470. OAS2T77B hea dee PAGE. i) 


SET/EQU . : 
STORAGE ALLOCATIONe : 
ADDRESS LENGTH BINARY CONTROL CARDS. 
. é 
0 a IOENS SET/EQU 
4 END CHECK 
ENTRY POINTS. 
CHECK 1446 
EXTERNAL SYMBOLS. 
SYS= 
SET/EQU COMPASS 325-670, 06/27778 16.20.34. PAGE 2 
TOENT SET/EQU 
ENTRY CHECK 
@ 
e 
° USE OF SET AND EQU PSEUDO INSTRUCTION 
e . 
e 
144 CHECK Eau 100 
144 CHECK) " 100 
~ 0 6130000144 $6) CHECK 
I 12 SETCHK SET 10 
e 6240000012 SR4 SETCHK 
a 20 SETCHK SET 208 
1 6150000020 SAS SE TCHK 
oO CHECK fou 2008 
6160000244 S86 CHECK 
1000000 SETCHKE SET 262144 
100000 SETCHK2 = 1000008 
COMMENT THIS IS AN EXAMPLE OF A COMMENT 
° THIS IS AN EXAMPLE OF A COMMENT 
.. THIS 1S AN EXAMPLE OF A COMMENT BLANK PSEUDO OP 
so co. 40 THIS IS AN EXAMPLE OF THE Cot PSEUDO OPERATION 
0 2 0000000000 ; THIS TS AN EXAMPLE oF THE CoOL PSEUDO OPERATION 
71602467021 ENDRUN ' 
ry END CHECK 
473008 SCH STORAGE USED 28 STATEMENTS 6 SYMBOLS ‘ 
MODEL 174 ASSEMBLY 0.028 SECONDS 12 REFERENCES 7 
2 ERRORS IN SET/EQU 
SET/F£OU : COMPASS 3.5470. 067277978 16.20034%. PAGE 3 
EQROR OJRECTORY. 
0 TYPE ERROR OPERATION FIELD B40. 
OCCURRED ON PAGES ? 
O TYPE ERROK DOUBLY DEFINED SYMBOL. THE FIRST DEFINITION HOLDS 
OCCURREN ON PAGES _ 2 


ee ee ot 


ST-ZL 


“COMPASS 3.5-470, 


SVMNOLIC PEFERENCE TAHLE. 


SFTZEOU 
CHECKR tas 
CHEERY has 
SET CHK 20 
SETCHRT 3000000 
SFICHR? poonnd 
Sve 0 


7708 f 27a 


t 
n 
e7lin esi? 77190 
n rs 
0 


FRTERNALS 2728 


“FF ONA2= CYAIIS-SNI 
16.20.32. N0N00MI FAOH 75H 


09729778 


e7 la 


2/16 


SLBI/R6H 05715778 


16.20.32.1P 00000320 WORDS ~ FILE INPUT » OC 04 
16.20.32.00N. PSOCOZTASTA2CTOLIAMILLER 
16.20.33.COMPASS, 

16.20.34, 2 €RRONS IN SET/EQU 

16.20.34, ASSEMBLY ERRORS. = 473008 SCM USED. 
"16.20.34, 0.085 CPU SECONDS “ASSEMBLY TIME. 
16.20.34.ERIT, 

16.20.34.0P 00000876 WORDS + FILE OUTPUT » OC 40 
16.20.3455 3564 wOoRDS ft 10752 MAK USED? 
16.20.34.CPA otiS SEC. e135 Ans, 
16.20.34.10 e474 SEC. oATS ADS. 
16.20.34." 6.400 KUS. «S17 AOS. 
16.20.34.55 1.107 
16.20.34.PP 20696 SEC. DATE 06/27/7786 


16.20.34.€9 END OF JOBe SH 


rts rely 


PAGE 
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REPEAT COMPASS 3.5-470, 04729778 16.26.10. PAGE ? 


NENT urprat 

cist NeMehel ‘ 

ENTAY SHETTY 

REP SSM 0/T OMB 56/3. AFP PsFUDO OP 


0 00000000000000000001 SAN DATA Peete deaeS 
1 On00000000000N000002 
2 000000n0N00000000003 
- 3 00000Nn200v0000000008 
& 000NMD000V0NNNNDDANS ~ 
5 5S1200n0064% AETTY Sa? ASP 
; 76A20 Sah a2 
; 10722 Ax? "2 
6 $140000000 C ga4 ANS 
; 517000000! C Sar ANSeo} 
? S130000082 -« coop Sar wnen 
10793 Bx? x2 
10 $17000000) Sar? ' 
514000000) Saa 1 
11 4 O3160Nn0007 - i NZ "4 e¢LVOP 
12 05160260000000000000 woRO VEN 187 ILENN 237601970 
13) 03020304050607101112 Data 10t AHCORFGHIS 
0-0 HASE n 
me : / 12 TM RSSZ 10 
USE 7ANS/ USE LARELED COMMON 
0 to ANS ass2 A 
~ USE 4/ USE. BLANK COMMON 
Aa ) 10 BSS 
fo) 26 ; END AETTY 
473008 SCM STORAGE USED 246 STATEMENTS & SYMROLS 
MODEL 174 ASSEMALY 0.029 SECONDS 13 REFERENCES 
OuMp = OE ATIVE AMP EDDA TTP) 
ootnt 00000 ONNN0 VOONnN NnnKSe t607) BANOO AONNY OnNND ANN00 NN0NO n000N On000 00122-0000 00000 onn0d nono! 
00822 00000 ONned voona On0n2 00000 ANHN0 nOAnY ONnnI 
o0tes 00000 ONn00 voonn 0n00% 0000N O00NN nuOOU DvOHNS 51200 00064 74620 In?22 1600 OoOlll St700 onii2 
00130 51300 00193 197139 sA4n00 Stten onnul steou nnnot 03140 00230 41000 «4000 05160 46000 no00n An000 
Ootd«6 01020 30405 u46071 O1nt2 On000 NnHVO nONnnO OOONI 10000 00000 nnono on0v2 00000 00000 N0000 nanot 
oohseo 00000 00000 o000N GOnns O00ND AenuN Hono OOnNS ON000 00000 nnono0 onnol 00000 00000 on00n onnn2 
00164 00000 00000 vonno 00n0) 000NO ONhuY ANNnnY nnNnNns 90000 09000 00000 Onn05 60000 00000 040046 nia? 


OOIF7 60000 00n00 04004 00177 


ey 


REPEAT , i COMPASS 3.5-670, 06/27/7718 16.28.10. PAGE 1 
STORAGE ALLOCATION. j 
ANORESS LENGTH BINARY CONTHOL CARDS. 
0 26 IneNT VEPEAT 
26 END netty 
ALOCKS Type AUDRESS LENGTH 7 
PROGRAM® LOCAL 0 26 
ANS COMMON 0 10 
iA COMMON 0 10 
ENTRY POINTS, 
AETTY 6e 
LOAD MAP < aePeat : CYAER LOADER 1(.4-470 06727776 16.28.10. PAGE 1 
fwA oF THE Loao ant 
LwAe) OF THE LOAD 1s? 
~J . : 
iG TRANSFER ADDRESS ~~ BETTY 126 
~J 
PROGRAM ENTRY POINTS =~ Repeat 126 
PROGRAM AND BLOCK ASSIGNMENTS, 
BLOCK ADDNESS LENGTH FILE pate PHOCSSR VER LEVEL HARDWARE COMMENTS 
7ANS/ int 10 
RePeat 12a 26 ico 06/27/7708 COMPASS 3.5 470 
ZA 147 to : wer Nii2- CYALTIS-SANI 4LB7/ROU 05715778 
16.20.08.DONO0MR FROM 73H 
16.28.068.1P 00000370 wOHOS - FILE INPUT ¢ OC 04 
16.2.00.00N. PSDcCOZTALTACTOPIAMILLER 
o@12 CP SECONDS 132008 CM STORAGE USED 16.28.10, COMPASS, ' 
16.20.10, ASSEMBLY COMPLETE.  47300R SCH USED. 


\ ; 16.28.10, 0.083 CPU SECONDS ASSEMALY TIME. 
16.275.10,.LOADI(LGOD 
16.20.10. FXECUTEIRETTY) 
: 16. 2H.1DR DMPCEELSI7TD , 
a 16.28.13.0P 0000076A WORDS ~- FILE OUTPUT + OC 40 
16.28.21.mS 3586 woRODOS ¢ 10752 MAX USED? 


16.28.11,CPA 0120 SEC. 2170 aos. 
16.28.11.10 2609 SEC. 6609 ADJ. 
16.26631.C 9.960 KWE. 2600 ADJ. 
16.280.11.55 1.390 

16.26.12.PP 3.316 SEC. DATE 06727776 


bA.26011,.€5 END OF joe SH 


coc : COMPASS 3169-470, On77T/TIA 09,06, 34. PAGE ? 


IOFNG 4 Or 
ENTQy. «AM 
a 12 : “S57 10 
12. 0006000000000°000001 GAN Data Leretee 
16 &an00 . sam NO 
12 Lac ran 
t2 S100n0000 Cy re | 
$120000001 Sa? 1 
13 58300900189 « gal ° 
Spennonnis « Sas ae2 
USF ° 
2t. tnenl : PIA ut 
74690 SA a) 
74740 Sx? as 
22 5160000033 «¢ SAG aNnsSe6 
§1709000034 ¢ Sa? aNse? 
23) 7160267021 ENORUN 
25 12 ANS BSS? 40 : 
37 7 FANN san 
&73N0R SCM STORAGE USED 22 STATEMENTS & SYHAOLS 
MOMEL 174 ASSEMBLY 0,024 SECONDS A REFERENCES 
Ounp PELATIVE NMP CRED 1ST) 
onnne 00000 00000 00000 00000 00123-00000 00000 0900 Onno! 
oole2s 0000N OH000 00000 O0n02 00000 00000 nOnHY 00003 00000 00000 00000 00004 £6000 44000 61000 46000 
00130 5100 Conno S1200 0000! St3n0 Ones Seno 00126 1O6RL 74630 74740 46000 $1600 00144 SI700 0014S 
COR Je 71602 “#771 20650 46000 01000 00152 Htn00 46000 00000 00000 09000 00000 00144-00000 00000 00000 001246 
00145 09000 00000 vo0n0 00126 00000 0n000 n0n00 00000 00147-n0H00 00000 00000 00000 


| 


toc 
STORAGE ALLOCATION. 
ANDRESS = LENGTH 
0 37 
st 
LOAD MAP ~ LOC 
Fua OF THE LOAD 
Lwaeh OF THE LOAD 


TRANSFER ADDRESS -- SAN 


PROGPAN ENTRY PUINTS -- 


6T-ZL 


(COMPASS 3.5-470. 


RINARY CONTHOL CARNS, 
TOFNT (COC 
END SAM 
ENTRY POINTS, 
say ine 
EXTERNAL SYMAOLS. 
SYS 
CYRER LOADER 1.4-470 
an 
210 
12? 
toc 127 


PROGRAM AND BLOCK ASSIGNMENTS, 


BLOCK ADDHESS §=LENGTH FILE Date . PHOCSSR VER LEVEL HARDWARE 
Loc $3) 37 tco 0472777 CUMPASS 3.5 470 
SYS .AM 1s0 60 SL-SYSLIB 05716778 COMPASS 3.5 470 


e025 CP SECONNS 


132008 CH STNMPAGE USED 


09.04.32.N0N00SU FROM 


06/27778 09,04.3%e PAGE 1 


OR727778 09.04.35. PAGE 1 


COMMENTS 


PROCESS SYSTEM REQUEST, 


SLUI/A6B «05715776 
AL) 


NB2- CYRITS~SNI 


09.04.32.1P 00000256 woHnS - FILE INPUT » NC O04 
09.04%.32.P0N. PSN eO2TASTZCTORIAMILIER ; 
09.04.34. COMPASS, : 

09.04.34. ASSEMBLY COMPLETE. 47300 SCM USED. 
09.04.34, 0.073 CPU SECONDS ASSEMBLY TINE. 
09.0%.34.160. 

09.04.35.0P 00000704 WORDS - FILE OUTPUT « OC 40 
09.04.35.MS ISAS WORDS 1 TIOA Man USED) 
09.04.35.CPA 0132 SEC... o)92 40J. 
09.0%.35.10 e628 SEC. 067R ADS. 
09.04.35.CN . 9,.9AT KS, 609 ADS, 
09.04.96.55 1.37 
09.0%.36.PP 3.537 SEC. DATE 06/77/70 


09.04.36.85 


END OF JOB> SH 


CHECKY COMPASS 165-670, Ons297TK 1A 2A. We PAGE 1 


STOPAGE ALLOCATION. © sa 
arGRESS LENGTH ; BINANY CONTROL CARDS, 
0 ? TOFNY coRCR) 
7 ENN Sari} 


FNTRY POINTS. 


STARTI pe TAG “Qo 


EXTERNAL SYMBOLS. 


SYS STani2 

CHECKS COMPASS 365-4706 04727778 96.28.34. PAGE q 

SYMBOLIC REFERENCE TAALE. 
~ 1 
1 HOLD 6 PproGNAMe 27348 § 
ad svarti 2 PROGRAM® 2702 € 27P Lv 
O  stant2 0 EXTERNAL 2795 

SvSs 6 ExTERNAL®E 2799 ‘ 

TaG r) PROGRAM® 2702 € 2730 t 2/92 


curcey \ COMPASS Vo GnaA, OA/PT/TA 167A. 1G. PAGE ? 


forNt cHrcAl 
ONTYY GTA EE STAG 
Cts « 


CPP eee rrr revi rrr rere errr Teer errr reyes 
. : ° 

OFF AULT SYMHOLS . 

4 . ° 

WHEN A SYYROL ORE FMENCE $5 PRECEDFN Hy =S OP 2x AND TuE SvMANL 16 NOT DEFINED 
IN TMF SUMPHNGO AH. COMPASS NEFINTS THE SY4BOL np DFCLAWES TT AS AN EXTERNAL © 
SYMANL + QFSPECTIVEL Ys AT THE END OF ASSFMALY. THE =x FORM JS DEFINED AY . 
OFF AULT IN MEE NCATE ARIF ASSEMAL TFS ONLY, bd 
e 

=SSYPPOL tf Syv4PNL 15S NOT NEFINED. COMPASS ASSIGNS AN ADDRESS AT THE END Ore 
THE 7020 BLOCH. ALL SUNSEQUENT REFERENCES TO THE SYMBOL s WHE THEA @ 

PHECFNFD RY 25 OR NOTe ARF 10 THE LOCATION oF THE WORD. A NFFAULT® 


SY#ANL CANNOT ME USED WHERE A PREVIOUSLY DEFINED SYMAOL IS REQUIRED 
. e 


If THE SYMBOL 15 DEFINED AY CONVENTIONAL METHOD: COMPASS DOES NOT © 

DEFINE BT AGAIN AUT USES THE PROGPAUMER DEF INETION, ® 

SNSYMAOL THIS OPTION PFRMETS A PANGRAMMER Th DEFINE HIS SYMBOLS IN A SUB- © 
~ ROUTINE OF LINK TO THEM IN ANOTHER SURPROGRAM. IF THE PROGRAMMER © 
NEFINES THE SYMROLe THE @SSEMALER USFS THE PROGRAM DEFINITION. I1F® 
THE PROGHAMMER DOES NOT NEF INE FHE SYMBOL» THE ASSEMBLER ASSUMES © 
THAT THE SYMAQL TS EXTEQNAL AS THOUGH DECLAPED IN AN #EXT#® PSEUDO © 


“J 
! INSTRUCTION, & SYMANL PREFIXED AY ex MUST CONFORM 10 THE RFOUIRE-* 
he MENTS FOM FXTERNAL SYMAOLS. : ° 
e 
: COP OC OOOOH OOO HOSE HOO EEOOEEEEEEEHO OHO SOOO ORETOR OSHS EVOTSOEUEEOD ODEO EDERDOEOOROES 
A RAPSRRREREERERER EEL TAG Data Oe] 
A AARA RR AAREREREEE RL 
2 S2120090000 « Stanti Sal TAG : . ' 
to7te a) AAT ca TRANSMIT (X91) TO AP 
3 5170000006 + Sar =SHOLD 
; 0700000000 JP 2XSTART2 
4 ENNRUN 
& 7260207025 $XH IRENDSGO) ENORUN 2D 
20650 LAA 40n ; ENDRUN DB 
§ 0100090000 a Ry enSvse ENDRUN ot 
ENDM ENDAUN oh 
NEFAULT SYMROLS DEFINED BY COMPASS. . 
6 HOLD 
OR STart2 
OR SYSe 
? : tan stantt 
504000 SCM STORAGE USED GN STATEMENTS & SYMAOLS 


“MONFL 176 ASSFMALY 0.958 SFCONNS A PEFERENCES 


CHECK2 COMPASS 3.5-670. 06727778 1h. 2A. 34s PAGE i] 
STORAGE ALLOCATION, 


ADDRESS LENGTH HEINAKY CUONTHOL Carns, 
0 6 TOENT cHFCHKe 
ry ; END 


ENTRY POINTS, 


START2 ae 


EXTERNAL SVHHOLS,. 


SYS TAG 


CHECK? / COMPASS 3.45-470,. 04727778 16.28.34. PAGE ? 


IDENT = CHECK2 


ris ENTRY STaRte 
nN 0 SiMOHOHOOO! XK Startv2 Sal- sXTAGeo) 
N 1o7e) ANT nt 
1 $9709n000) « : Sat SAVE 
7160247021 ENNRUN 
3 i] SAVE ass? i] 
ry END 
473008 SCH STORAGE USED ta STATEMENTS & SYHAROLS 
MODEL 174% ASSEMBLY 0.015 SECONDS & REFERENCES 
CHECK? COMPASS 1.5-670, 04727778 16.28.34. PAGE 3, 
SYM@OLIC REFERENCE TAALE. 
Save 3 PROGRAM 2/05 § e/a 
STaRt2 0 PnoGHaMe 2702 € 2/709 L 
SYS 0 FaTERNAL SO 2/07 
Tao 0 FRATERNAL 2703 


LOAD HAP - CHECKE 


FwA OF THE LOAD 
LwWAel OF THE LOAD 
TRANSFER AONRESS -- STAQTI 
PROGRAM ENTRY POINTS -- 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADDHESS LENGTH 
CHECKE . tos 7 
CHECK2 120 r 
SYS.AM 124 


~) OuNpP 

i 

NS) 
oontt 

ve 001ls 
00120 
001246 


0025 CP SECONDS 


RELATIVE 


vreey veare vver? rrr 
51700 00197 02000 00120 


51100 OO112 LOTTE 46000 
04000 00837 ONONN 00000 


ee 
166 


40 SL-SYSLIB 


232008 CH STOAAGE USED 


NUP CMDR tZT) 


Terry vevee verve VIII 
71602 S702) 20650 46000 


51700 Ont23 FlAN2 ATA) 
01300 00000 n0000 OONnnD 


05/16/78 COMPASS 3.5 470 


CYREN LOADER 124-470 06/27/7768 16.20.35. PAGE 
1n3 
CHFCKA 9 
FILE DATE PROCSSA VER LEVEL HARDWARE COMMENTS 
tco 06/27/78 COMPASS 3.5 470 
LGo 04/27778 CUMPASS 3.5 470 


PROCESS SYSTEM REQUEST. 


4 TABLE MOVE 


51100 OON11 1OTAT 46000 
91000 00126 #1000 44000 


20650 01900 00824 4f000 
04000 0923 NNDNN On000 


MFF NB2- CYAI?IS-SNE 4LOT/ROA 05715718 
16.28.32.DONO0NS ROH “Sh 


16.28.32.1P 00000512 WOHDS - FILE INPUT © OC 06 
16,28.92.00N. PSHeO27H8e72CTOLIASHILLER 
16.28.33. COMPASS, 


16.28.34, ASSEMBLY COMPLETE. So400n SCM USED. 
16,208.34, 0.130 CPU SECONDS ASSEMNLY TIME. 
16.28.34,160. 

16.20.35, DNPULDR e127) 


16.20.35.0P 00002216 wOrNsS = FILE OUTPUT « OC 40 
16.26.36.45 3584 wORDS ¢ 7168 Hau USED) 
16.26.36.CPA elA2 SEC. o16d ADS. 

_ 16.26.36.10 0642 SEC. 0642 ADI. 
§16.28.36.CM 12.400 aus. 0695 AlhJ. 
16.2.36.55 $.520 


16.20.36.PP 3.099 SFC. 
16.28.36.€) END OF JOD. SH 


- DATE 06/27/76 


Vevey Verve vever vrvee 
VreTT VIFVT VIVIF VIFIG 


SI800 COO OFRIM aNt2? 


PROGHAM INITIAL T4774) = OP Ta} FIN 4.70405 03/04/79 32.26.38 . PAGE | 


1 PROGRAM INITIAL (OUTPUT) ; 
COMMON /ANSWER/ BUFFER (IOS 
CALL START 
PRINT 10) 
5 PRINT 1000 (QUFFER(E) of=bo16) 
100 FORHAT (4022) 
10% FORMAT ORM) 
END 


SUBROUTINE ERHKHSGI Tast4 OPT ad ; FIN 4.7°485 01/04/79 12.26.38 PAGE | 


] SUUROUTINE ERRHSGI 
PRINT 100 
' 100 FORMAT LHds® ECS WAITE ERAOR®) 
RETURN 
5 ENO 


a ° 
I 
J 2 : 
- SUBHOUTINE ERRMSG2 TA/T4 OP Ta} FIN 4.70405 01/04/79 12.26.38 PAGE a 
i] SUDROUTINE ERRMSG2 
PRINT 100 ; 
100 FORMAT(IHIs® ECS READ ERROR*) 
RETURN 


5 ENO 


Loc7se00 . COMPASS 326-4176. 01704779 =12.31.13. PAGE | 


IDENT LOCTeo00 

List -“B9-R 

ENTRY START 

EXT ERHMSG1 sERRMSG2 
USE JANSWER/ 


0 20. ANSWER 8SSZ 16 
USE 0 
0 00000000000000000002 OPERAND DATA  192039405060798 
10 o0000000000000000000 START DATA 0 
11) 5100000015 « SA0 AOU 
7100000000 Sx0 0 
12 0120000044 WE LALOCKT 
0100000000 x : RU ERRMSG) 
13° Of}0000012 RE LBLOCK? 
. O100000000 x RJ ERRMSG2 
14 0400000015 « Ea ADD 
1S 5110000000 + ADO Sal OPERAND+0 
: 5120000001 ¢ ‘ SA2 OPLRAND?} 
16 5130000002 + SA3 OPERAND+?2 
5140000003 ¢ SA4 OPLRAND+3 
17 «36612 1X6 XLex2 
36734 1x7? M3OK4 
5160000000 C SA6 ANSWER#0 
20 5170000001 c SAT ANSWER] 
5110000004 ¢ SA] OPERAND +4 | 
my 21 5120000005 « SA2 OPERAND +5 
to 5130000006 « SA3 | OPERAND+6 
ui 22 S140000007 « SAS OPERAND®7 
36612 1X6 KL¢x2 0 
36734 [x7 XJONG : 
23 5160000002 C SAG ANSWER¢2 
5170000003 C SAT ANSWERS} 
24 $100000015 « SA0 AoD 
Tlogd00012: $x0 LBLOCKI 
25 0120000010 . RE LBLOCK2 
0100000000 x RJ ERRMSG2 
26 0100000015 ¢ ENDIBLK RU - ADU 
t 15 Loc ADD 
L 15 00000000000000000000 Supt DATA 0 
L 16 5110000000 + SAl OPERAND+0 
5120000001 « SA2 OPERAND?} 
L 17 5130000002 ¢ SAI OPERAND+2 
5140000003 ¢ SAS OPERAND+3 
t 20 37621 1X6 K2-X) 
37734 1x7 X3=X4 
5160000004 C SA6 ANSWER¢4 
L 21 5170000005 Cc SAT ANSWERSS 
5110000015 « SAO = ADD 
L 22 7100000022 Sx0 LBLOCK1 +LOLOCK2 
t 23 0110000010 ; RE LALOCK3 
0100000000 x RJ ERRMSG2 
i 26 0100000015 « END28LK RU ADD 
t 15 Loc ADD 
L 1S 00000000000000000000 MULT DATA 0 


Loc7600 


16 
17 


re 


20 


2) 


22 
23 


24 
15 
1S 
16 


17 


PoP rere creer 


20 


9E-L 


§110000000 « 
5120000001 
5130000002 « 
5140000003 
426l2 
42734 
5160000006 
5170000007 C 
~  §100000015 
7100000032 
0110000012 
0100000000 
0100000015 « 


00000000000000000000 
$1100G0000 « 
5320000001 
§130000002 ¢ 
5140000003 
27101 
27202 
24101 
24202 
44621 
27303 
27404 
24303 
24404 
44743 
5160000010 
Sl70000011 C 
26666 
267TT 
22666 
22777 
5160000012 
$170000013 C 
0400000010 « 
le 
10 
10 
l2 
44 
l2 
io 


1100B ECS 467008 CM 


END38LK 
DIVIDE 


END4SBLK 
LBLOCKI 
LBLOCK2 
LBLOCK3 


- LBLOCK4 


LBLOCKT 
MAXBLK 
MINULK 


EQu 
MAX 
MIN 
END 


STORAGE USED 


MODEL 73 ASSEMBLY 


COMPASS 3.6-476,. 01/04/79 


OPERAND+¢O 
OPERANDe) 
OPERAND*2 
OPERANOD?¢3 

X19xX! 

X3"X4 

ANSWER¢6 
ANSWERST 

ADU 

LBLOCK} +LBLOCK2¢LBLOCK3 
LBLOCKS 

ERRMSG2 

AOD 

ADD 

0 

OPERAND?¢O 
OPERANO?} 
OPERAND?e2 
OPERANDe3 

P| 

Xe 

Al 

x2 

X2/XK1 

x3 

x4 

x3 

x4 

X4/XK3 

ANSWER*8 
ANSWER¢9 

X69H6 

X7087 

X6986 

X7oH7 

sANSWERO10 
ANSWER¢)] 

STANT 
ENDIBLK-ADDe) 
END2ULK-SuBT +} 
END3BLK-MULTo] 
ENDSULK-DIVIDE+} 
LBLOCK) ¢LOLOCK2+LBLOCK3*L BLOCKS 
LBLOCK) sLBLOCK2sL BLOCK3eLBLOCKS 
LBLOCK] sLBLOCK2sLBLOCK3sLBLOCKS 


100 STATEMENTS 
0.347 SECONDS 


20 SYMBOLS 
O REFERENCES 


12033136 


PAGE 


2 


Nps pe eg ons at te ees ad, De peasen cc emtauosss. cfs. <.:: 3. = 
EBHeHReHeEEeEFEeEeEeSeEeEeEeee ea 


LO-L 


LOAD MAP = INITIAL 


FWA OF THE LOAD - 
Lwael OF THE LOAD 


Mi 
7166 


TRANSFER ADDRESS == INITIAL 


PROGRAM ENTRY POINTS -- 


2213 


INITIAL 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK 


ZANSWERS 
INITIAL 
ERRMSGI 
ERRMSG2 
LOCTe00 
/STP.CENDZ 
7FCL Ce 
/Q8.10.7/ 
QeNtIHY= 


7FCL=ENTZ 


COMO: 
FCL=FOL 
FEIFST= 
FLTuuT= 
FORSYS= 
OutTCcUOM= 
SYSAID= 
FECMSK= 
FMTAP= 
FokRUTL2 
GETFIT= 
KODER= 
OuTCc= 
4FUL«COM/ 
FOL.RES 
FOL. MMI 


‘CPU.SYS 


CMF CALF 


_ CMF .CSF 


CMM. FFA 
CMF FRE 
CuM.R 

CMF .SLF 
CTLSRM 
ERRSRM 
LASTSRM 


0330 CP SECONDS 


ADDRESS 


11) 
13) 
2236 
2252 
2266 
2347 
2350 
2376 
2477 
24TT 
2537 
2572 
2632 
2635 
3146 
3447 
3623 
3624 
3665 
4244 
43he 
4371 
$042 
S212 
$226 
5437 
5661 
5721 
6101 
6107 
6123 
6161 
6375 
6417 
7052 
7077 


‘LENGTH 


FILE 


L6O 
L6o 
tGo 
tco 


SL-FORTRAN 


SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 


‘SL-FORTRAN 


SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 


SL~SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 
SL-SYSLIB 


CYBEA LOADER 1.4°485 


2213 | 


DATE 


01/04/79 
03/04/79 
01/04/79 
01704779 


11/16/78 


11/16/78 
11/16/78 
11/16/78 
11/16/76 
11/715/78 


11/16/78 


11716778 
11/16/78 
11/16/78 
11/16/78 
1l/to/78 


11716778. 


1li/1lo/78 


11/02/78 
11/02/78 
11/15/78 
11/15/78 
11715/78 
11715778 
11/15/78 
11/15/78 
11/15/78 
11/16/78 
11/16/76 
11/16/78 


PROCSSR 


FIN 
FIN 
FIN 


COMPASS - 


COMPASS 


COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
CUMPASS 
COMPASS 


COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 


COMPASS. 


COMPASS 
COMPASS 
COMPASS 


236008 CM STORAGE USED 


VER 


LEVEL 


405 
465 
465 
476. 


465 


405 
405 
445. 
485 
485 
485 
45 
4B5 
485 
465 
4u5 
465 
485 


405 
485 
476 
46S 
485 
405 
445 
465 
485 
485 
485 
46s 


HARDWARE 


666X | 
666X I 


. 666% 1 


01/04/79 12.21.17, PAGE i 


COMMENTS 


PROGRAM OPTs} 
SUBROUTINE OPT=] 


' SUBROUTINEOPT=1 


FCL INITIALIZATION ROUTINE. 


COMMON CODED 1/0 ROUTINES AND CONSTANTS, 
FCL CAPSULE LUADING 

CONVERTED DATA STORAGE 

COMMON FLOATING OUTPUT CODE : 
FORTRAN OAVECT LIBRARY. UTILITIES, 

COMMON OUTPUT CovE 

LINK BETWEEN SYS=AID ANO INITIALIZATION CODE. 
INITIALIZE CONSTANTS. 

CRACK APLIST AND FORMAT FOR KODER/KRAKER,. 
FCL MISC. UTILITIES. . 

LOCATE AN FIT GIVEN A FILE NAME. 

OUTPUT FORMAT INTERPRETER, 

FORMATTED WRITE FORTRAN RECORD. 


FAST DYNAMIC LOADER RESIDENT. 
FDL MEMORY MANAGER INTERFACE. 
PROCESS SYSTEM REQUEST. 

CMM VIo1 = ALLOCATE FIXED. : 
CHM Viel = CHANGE SPECS FIXED. 
CHM Viel = FIXED FREE ALGORITHM, 
CMM Viel = FREE FIXED. : 

CMM Viel = RESIDENT SUBROUTINES, 
CMM Viel = SHRINK AT LWA FIXED. 
CRM CONTROLLING ROUTINE, 

CRM ERROH PROCESSOR ENTRY.* 

CRM - ALLOCATE SPACE FOR LIST OF FILES 


“32 TABLE MOVES 


00000000000000000003 @0000000000000000007 00000000000000000013 00000000000000000017 
00000000000000000001 TITTTITTTTTTITIITITITG 00000000000000000002 00000000000000000014 
17214000000000000000 17205252525252525252 0000000000000000000e 00000000000000000001 
00000000000000000000 00000000000000000000 00000000000000000000 00000000000000000000 
MFS NHl- CYB7T4-SN1I08 5C/ROB 11714/78 
12026.16.DONOQ0HT FROM 70K : 
12626016.3P 00000768 WORDS - FILE INPUT » OC 04 


L2e26e16eDONSECL. 0014268830 1896eMILLER 
120626038. HEWIND OUTPUT. 
12e26e3BeF INSR=00 


L2e3L 14, 2706 CP SECONDS COMPILATION TIME 
12.31 14.MAPOPART. — 

12¢31.15.L60., 

b20310196 END INITIAL 

b2031.19. 2069 CP SECONDS EXECUTION TIME 
P2eDL 19 EXIT. 

12.33219.0P 00001536 WORDS - FILE OUTPUT » OC 40 
L2e3ke19HS 3564 wORDS -t 14336 MAX USED) 
12.31.19.CPA 0764 SEC. e164 ADJe 
12231219.CPB 0453 SEC. 0453 ADJ. 
$2.31.220.10 2.0861 SEC. 2.081 ADJ. 
b2031-20.CM 62.324 KWS. 32303 ADJ. 
12.3)-20.EC 3.685 KWS,. e051 ADJ. 
§2.31.20.S5 72154 
12.31.20.PP 15.234 SEC. DATE 01/04/79 


12.31.20.EJ END OF JOBe OH 


5 b 
4 


ERRKX ' COMPASS 326-476. 02/09/79 126272566 PAGE. 1 


IDENT ERRXX 


ENTRY ERRXX 
SMENOHOSESOHDHDOHSOGOHENNGEHEEHORSHHEODSHGHOSHEHEREENSHHECHOEHORSEHORESAHAEHEHERY 


ERRXX = CONDITIONALLY SET ERROR FLAG 


AN ERRXX PSEUDO INSTRUCTION PRODUCES AN ASSEMBLY ERROR WHEN A CON- 
DITION DETECTED DURING THE SECOND PASS OF THE ASSEMBLER IS TRUE. 


esse2st 
esse oeeoes8 


PLOCATION ERRXX AEXP 


FLAG A SINGLE ALPHANUMERIC CHARACTER DENOTING THE ERROR TYPE. THE FLAG® 
IS PLACED IN THE LISTING TO THE LEFT OF THE LINE FOR THE “ERR**. = 
THE FLAG CAN DENOTE A FATAL OR NONFATAL ERROR. A FATAL ERROR bd 
CAUSES "COMPASS" TO SUPPRESS GENERATION OF THE BINARY DECK UNLESS ® 
THE “D" MODE OPTION IS SELECTED ON THE "COMPASS" CONTROL CARD. IF® 
NO FLAG IS SPECIFIEDs OR THE CHARACTER IS NOT ONE OF THOSE GIVEN 

. IN SECTION 12.9 OF THE REFERENCE MANUAL» "COMPASS" USES "PH, 


MX DEFINES CONDITION UNDER WHICH AEXP VALUE IS ERRONEOUS. 


XX F - ERROR CONDITION : 
NG OR ME VALUE OF EXPRESSION IS NEGATIVE 
NZ VALUE OF EXPRESSION IS NONZERO 
PL VALUE OF EXPRESSION IS POSITIVE 
ZR VALUE OF EXPRESSION IS ZERO 


6c-L 


AEXP ABSOLUTE EXPRESSION. IT CANNOT CONTAIN EXTERNAL SYMBOLS OR REFER-® 
ENCES TO BLANK COMMON. THE ‘TEST IS MADE IN PASS TwO OF THE AS- bd 
SEMBLER. RELOCATEABLE ADDRESSES ARE ASSIGNED VALUES RELATIVE TO & 
PROGRAM ORIGIN RATHER THAN TO THE BLOCK IN WHICH THEY ARE DEFINED.® 


NOTE? 


 ERRXX IS THE ONLY CONDITIONAL INSTRUCTION FOR WHICH THE TEST IS 
MADE IN PASS.TWO. THEREFOREs THIS IS THE ONLY PSEUDO INSTRUCTION 
THAT CAN BE USED TO DETERMINE PPU OVERFLOW IF THE PPU PROGRAM HAS 
LITERALS AND "USE" BLOCKS. 


*eseseesce oe eoescoee oes ee seez ae aeseane ts 


etseeeoeer se 


COOP rere Viririrrrrrrririiriirrrrririrrriiiiriitirrrr ii itt) 
0 00000000000000000000 ERRXX OATA- 0 
. } EQu 1 
~} © 
0 
-1 
-1 


1 


= 0 
ERRNG C 
ERRMI C 
ERRNZ 8B 
ERRPL 8 
ERRZR O 
27 ERRPL 8B 

1 7160247021 ; ENORUN 

3 : 144 BUF BSS 100 
147 BUFF bss 0 
1467 END 


oorax<noag 


VAUVVIGT 
= 


UFF-ERRXX=3208 


475008 CM STORAGE USED S57 STATEMENTS 7 SYMBOLS 
MODFL 74 ASSEMALY 0.206 SECONDS 0 REFERENCES 


ERRXX COMPASS 3.6-476. 01/09/79 12.27 .5S60 PAGE 2 


5 ERRORS IN ERRXK 


ERRXX : COMPASS 326-476, 01/09/79 12.27.56. PAGE 3 
ERROR DIRECTORY. ; 


P TYPE ERROR CONSULT LISTINGS FOR REASON BEHIND P-ERROR. 
OCCURRED ON PAGES 1 


6 ‘TYPE ERHOR LOCATION FIELO MEANINGLESS. 
OCCURRED ON PAGES 1 , 


OE-L 


MFS N#l= CYB74-SN108 SC/ROB 31714/78 
12627e¢53.D00NO0FL FROM /OH 
12.27.53.I1P 00000512 WORDS - FILE INPUT » OC 04 
12-27.53,D0NeT5. 001As6483s1A96eMILLER 
12.27.55. REWIND, OUTPUT. 
12027255 CUMPASSeLO=BR. . 


12.27.57. 1 WARNING MESSAGE IN ERRXX 
12.27.57. 5 ERRORS IN ERRXX 
12.27.57. ASSEMBLY ERRORS. 475008 CM USED. ’ 


12.27.57, 0.385 CPU SECONDS ASSEMBLY TIME. 
12-27.57.0P 00000704 WORDS = FILE OUTPUT » OC 40 
12.27¢57.MS 3584 WORDS ¢ 10752 MAX USED) 


12.27.57.CPA e291 SEC. 0291 ADJ. 
12.27.57.CPB olT4 SEC. olT4 ADUe 
12.27.57.10 0305 SEC, . 0305 ADJe 
12.27.57.CM 14.978 KWS, 0914 ADJe 
12027.57.SS 1.685 

12027-57.PP 32370 SEC. DATE 01/09/79 


12.27.57.EJ END OF JOB» OH 


Lesson 8 
ERROR EXITS 
LESSON PREVIEW: 


THE VARIOUS ERROR EXITS ARE DETECTED IN THE HARDWARE AS 
WELL AS SOFTWARE, 


REFERENCES: 
CHAPTER II COMPASS #60492600 
TRAINING Arps: © 


_Visuat Set V8 


PROGRAM COMPILATION & EXECUTION LISTING OF Deck 8A WITH 
DUMP, 


PROJECTS: 
HOMEWORK 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE 
ABLE TO: . 


1, DETERMINE THE CAUSE OF EACH ERROR MADE, - 
2, LOCATE ITEMS INVOLVED WITH THE ERROR IN THE DUMP, 
3, UTILIZE THE EXCHANGE JUMP PACKAGE SOLVING THE 
ERROR MADE PROBLEM, 


SPECIAL FORMS 

CYBER FLOATING POINT HARDWARE IS VERY SPECIFIC IN THE 
VALUES RETURNED AS A RESULT OF ARITHMETIC OPERATIONS 
WHICH ATTEMPT TO GENERATE INDEFINITE OR OUT-OF-RANGE 
NUMBERS, 

UNDERFLOW 

0000 EXPONENT (orn 7777) 
INFINITY 


3777 EXPONENT (or 400 0) 


INDEFINITE 


1777 EXPONENT Cor 6 0 0 0) 


cae 4 


” 3 u 


THESE ARE THE OUT-OF-RANGE AND INDEFINITE NUMBERS GEN- 
ERATED AS A RESULT OF FLOATING POINT OPERATIONS, 


INFINITE - THE NUMBER IS TOO LARGE (OVERFLOW) 

ZERO FoRM ~- THE NUMBER IS TOO SMALL (UNDERFLOW) 

INDEFINITE ~ THE COMPUTER DOES NOT KNOW WHAT RANGE 
THE OPERAND LIES IN (FOR EXAMPLE, IT 
MAY HAVE BEEN PRODUCED AS A RESULT OF 
USING AN INFINITE OPERAND) 


SPECIAL FORMS MAY BE HANDLED IN THREE WAYS: 


1. CHECK THE OPERAND WHEN IT IS GENERATED BY USING 
_ JUMPS 


IR 
OR INFINITY TESTS 


DF : 
ID INDEFINITE TESTS 


ZR | 
NZ/  UNDERFLOW TESTS 
OR | 


2, ALLOW THE HARDWARE TO ABORT. THE JOB WHEN AN ATTEMPT 
IS MADE TO USE A SPECIAL FORM BY SELECTING AN EXIT 
MODE. (THE EXIT MODES WILL CATCH USE OF INFINITE 
AND INDEFINITE FORMS. THEY WILL NOT CATCH UNDERFLOW,) ° 


3. IGNORE THE ERROR. BY DESELECTING THE EXIT MODE. THE 
INFINITE OR INDEFINITE OPERANDS MAY BE USED IN SUB- 
SEQUENT OPERATIONS. THIS OF COURSE WILL PERPETUATE 
‘ERRORS, | 


READ THE INFORMATION ABOUT EXIT MODE AND SPECIAL FORMS 
IN THE REFERENCE MANuAL - 60100000 (6000/CYBER-70) 
- 60420000 (CYBER-170) 


8-3 


NOTES ON HARDWARE ERROR EXITS 
CERTAIN ERROR CONDITIONS ARE DETECTED BY THE HARDWARE: 
50 49 4B 
/REFERENCING ADDRESS OUT OF RANGE 
» < a (ERROR CODE 1) 


USING INFINITE OPERAND (ERROR CODE 2?) 


USING INDEFINITE OPERAND (ERROR CODE 4) 


WHEN THE ERROR IS DETECTED THE HARDWARE WILL: 
(6000/CyBer-70/CyBer-170) 


1, Put THE cope 1n RA+O pits 50-48 
2. Put P+l * tn RA+0 pits 47-30 
3, Set P to 0 

THe SOFTWARE WILL: 


1, Discover THAT THE CPU IS NOT RUNNING 
AND THAT P=0, (MTR SAYS THIS IS 
ILLEGAL), 


2. PICK UP THE ERROR MODE AND ADDRESS 
FROM RA+0Q AND FORMAT A DAYFILE MES- 
SAGE, | ; 


3, Give tHE DMPX AND ABORT THE JOB, 


LOOK AT THE FOLLOWING EXAMPLE WHICH SHOWS ALL OF THESE 
CONDITIONS, 


Atso see CyBer REFERENCE MANUAL, 


* 


REFERRING TO WHAT P WAS AT THE TIME THE ERROR WAS 
DISCOVERED IN THE FUNCTIONAL UNIT, | 


tenre in COMPASS 3.5-670, On/277TAH = 0A.55.10. 
1NENT OFNOFE Ee 
FNTQyY INNEF EN . 
0 U7770000000000000000 INDEF vFn L270777R24870 «TMOFEINITE OPERAND 
hb FTZ21SN0000N00N0N00000 NUMAER DATA 2.0 
2 5StP00000N0 - INDEF IN Sag TNOEF 
S120000001 « Sa2 NUMOER 
3d eatl?2 Fx wisne USE INDFFINETE OPERAND IN OFVIDE 
& 4664000 . NO 
5 466000 . NO 
6 %6n700 CY NO 
y eennn ° wo 
7160267021 FNDRUN NORMAL TERAINATION 
i) ENN INNER IN TRANSFER ADONESS 
&7300R8 SCM STORAGE USED £6 STATEMENTS 4 SYPROLS 
MODEL 174 ASSFMALY 0.039 SFCONDS 7 REFERENCES 
OwPn, 
® 000000 AG 000700 fo 000000 : 
RA St0s00 ad OOOTHE Af 000001 CtAlbe 8777 GOON 9000 0000 on00 C(ntre On00 C0n0 . 0000 
FL 000200 A2 000812 R2 CODD02 § CIAZ2D= 1721 “00H oV00 0000 an00 C(Nn2)= On00 oOn0 9000 
e~ 700700 a3 o00NST AF 082799 CtAJI® 9000 v00H 0000 0000 0000 CiArpe 
PE 000055 Aa& 0000018 6& 000201 CtAGd® 9000 . 0000 90000 0000 0000 Cinetes 
00 F€ O000000 Aas 000513 85 000113 CtASd® §310 voot 2151 2000 O112 C(IfSi= 6210 OOO 11951 
! wa 001200 a6 000N0! fe 0002700 Cta6r2 0000 000n 90000 0000 ov0n0 CtAsie 
oO a?y 000008 OF 027756 CiA7T+2 0900 vonn ov00 00n0 Ono00 CIRT)s 
n@ 9000 C000 000 C000 0000 
at o377r «0000 0000 ovoo 0000 
R2 1722 8000 0000 Go00 0000 
nd 8777 0000 0000 000 0000 
n& 0000 0000 C000 ov00 2000 
RS 6000 0000 conse 0040 9000 
R6 1505 1520 000 0000 006) 
RK? 0000 ©0000 0000 c000 0000 
00000 00040 00117 00000 00000 00000 00000 00000 00000 : : 
00054 e56120 039810 00054 54710 $1100 09001 0388 00055 44550 02550 00000 46000 
00060 1505) $2000 o0000 00061 00000 On200 g0n00 onOn! 07040 00060 51600 On00! 
00068 14072 70000 00000 00000. 00000 00000 00000 00162 40000 00000 02000 oobi 
00070 14071 75755 00000 00000 00000 00000 00000 00000 
00100 #54000 C0000 01000 0000) . 
00100 $4000 00000 Of000 O0001 00005 10000 n0000 00162 10000 90000 00000 00000 
00108 #00000 00000 o0000 00162 00000 00000 00000 00000 
00130 eb1160 £0506 18160 00313 17770 00000 90000 00000 17214 00000 00000 09000 
ootls 64312 6000 61000 £6000... %6000 46000 41000 «6000 ; 
00120 #46000 TIAO0Z2 4702) 20450 ~ 91000 00126 61n00 46000 54190 20123 03310 00123 
ootzs 04004 00124 61000 £46000 $1190 O00! 03110 00125 54610 04000 00723 46000. 
oo1so 51100 00122 04000 00532 ‘ T1100 00130 20160 46000 13662 13161 83661 46000 
00134 $1100 C0008 O1ONO 00422 20662 01000 00124 s60no 51100 00003 O3110 00136 
00140 Stioe coool o3130 00197 71602 203146 04000 001395 20150 36661 01000 onl2s 
00144 79602 2031% 20652 36462 S$3t60 2o87d O33580 00143 03010 00143 S1100 oo00! 
00150 04000 00942 61000 46000 7160) 24610 12661 20651 01000 06124 #1000 44000 
00156 73660 20630 £2161 73410 20123 03210 10151 20151 13116 20636 51600 0016! 
00166 04000 0015) 61000 46000 - 00090 On000 nnn00 00N00 60000 00000 04004 00162 


mates 


@nnaa 


RAANA 


NARS, 


Antah LAAN RANAN NAAN ANE # ARAN AANAN ALNHe HHTAs 


PAGE 2 
0000 0000 
0000 9000 
2000 0112 
00000 00006 e0000 


04000 
00000 


51100 


#4000 
51100 
51600 
04004 
04006 
03110 
04004 
74660 
60000 


hRannan 


00063 00000 
00000 40000 


00111 52200 


ool27 61000 
00066 03310 
oolz23 1061! 
00137 61000 
00143 61000 
00145 T1100 
00153 61000 
36316 20829 
00000 04004 


ANNAN NAnnh 


00000 
00021 
on000 


ootl2 


46000 
00n3t 
46000 
44000 
46000 
00001 
66000 
44000 


0016) 
nia? 


INDEF Ett 
STORAGE ALLOCATION, 


COMPASS 3-5-4970. 


06727778 06.55.10. PAGE 1 


ANVRESS LENGTH BINARY CONTHOL CARDS. 
0 it ; INENS FNNEF IN 
hi END tNNEF IN TRANSFER ANOHESS 
ENTAY POINTS. 
INDEF IN, ra 
EATERNAL SYMBOLS. 
SYSe 
LOAD MAP - INDEFIN CYAFH LOANER 124-470 OA/27778 OSS oA de PAGE ’ 
FWA OF THe «OAD ae 
Uwac} OF THE LOAD 142 
Ss TRANSFER ADDRESS -- INUEFIN TK) 
f PROGRAM ENTAY POINTS -- INDEF IN 13 
PROGRAM AND BLOCK ASSIGNMENTS. 
aLocn ADDHESS = LENGTH FILE oate PNOCSSA VER LEVEL HARDWARE COMMENTS 
INDEF IN mt YY ee 06/27/78 CUMPASS 3.5 470 
S¥S.RM 122 40 SL-SYSLIB 05/16/78 COMPASS 3.5 470 PROCESS SYSTEM REQUEST, 
Le SR 4LOFsR6g 05/15/70 


2021 CP SECONDS 1392008 CM STORAGt USED 


06.55.07 .CON00%2 FROM 7S 
08.55.07.1P 00000892 wOROS - FILE INPUT 
08.55.07 .00N. PS0002 1H e TZ2CTOLIASMILLER 
06,.55.10.COMPASS, 

08.5510, ASSEMBLY COMPLETE. 


e OC 04 


&7300A SCM USED. 


08.55 0106 0.069 CPU SECONDS ASSEMBLY TIME. 
08.55.10.160, ; 
08.55.12.ERROR MODE 204. ANDRESS #000117 
08.55012.0P 00000960 WOHDS - FILE OUTPUT » DOC 40 
08.55e32.mS 3584 wOoRDS ¢ 7166 MAA USED) 
00.55.12.CPA ef2i SEC. e!20 ADJ. 
04.55.12.10 0639 SEC. 0639 ADS. 
06.55.12.CHh . 9.076 KwWS, 2602 ADS. 
06.55.182.$5 1.342 
08.55.12.PP 4.148 SEC. DATE 06/27/76 


00,55.12.E) END or JOB SH 


tsranne 


0 4ano0n 


apborvrony 
$ SESONO008 « 


TOFNT fsradoR 
FNTPY TStAvOR 


COMPASS 3.5-470, ‘ 


ADDAFSS OUT OF RANGE FRARORS 


THE LOAD OR STORE INSTRUCTION 


TNSTRUCTIONS REHIND THE ANNREs 
FOLLOWING PROGHAM WAS LOADED AT BIE, 
THE HARUWADE DID NOT DISCOVER ET UNTIL 


FRECUTED, 


Tstapor wo. 
sal -500 


473900h SCM SToRAce USED 
“MODEL 176 ASSEMALY 


46000 
2 46000 ° 
3 #6000 ry 
& 4686000 e 
' 9960247001 
6 
foe) 
I 
“I 
OmMpxz, 
P 000000 A0 000700 AO 00000 
PA 206600 al Trrizs wb Tran 
FL 000200 a2 nooneo 2 fnoOono2 
FY 700700 “3 mo00s? #9 01273) 
PE 000055 A& O00nnL Re 000708 
FE 000000 aS 001s PS OCONnEIE 
“a 001700 ah ODDNOE AR 00N200 
#? o00n0L PF Nn27756 
RO 0000 0000 9000 co00 ov0n 
| x1 0000 0000 0000 ov00 0000 
m2 1505 1520 0000 o000 106) 
RY 0000 0000 0000 ovoo v000 
R& 0000 0000 9005 0000 000 
™§ 6000 0000 00% o0e9 o00n 
6 3505 1520 noon ovood OOK 
sy 9000 ©0000 009 O000 000 
00000 =00010 011189 o0000 On000 
: 00056 456110 03130 00054 Serto 
00060 85051 57900 ooNNA CONG) 
000K6 14071 PO000 CoOnn OONND 
00070 14071 75755 00000 oon00 
00100 #54000 00000 01000 O0n0) 
00100 $4000 00000 of0n0 soont 
0010% #00000 0000 onono 0015? 
00110 #26232 40104 04270 00881 
nnttes ALANHAN FIRHD KHIADE INAEN 


CUAlds 
Ctagia 
Claype 
ClAads 
CUASds 
CUAKNS 
Clty: 


00000 
Stlno 
00000 
00000 
00000 


00004 
on000 
“6000 


AtAAnRA 


wsTanor 


1805 
0000 
000 
4700 
n00 
0090 


0n000 
onool 
on¢oo 
00000 
00000 


69000 
00000 
6tloer 


nntet 


0.025 SECONNS 


Sen 
v000 
o00n 
Voll 
ono0n 
vono 


00000 
Ve 
99000 
90000 
annoo 


nnno00 
n0000 
vrais 


gtnan 


OPO e CeO OOOO COOH COTO EEO OH ESSECUEN EOD OENELE 


FOR EXAMPLE s THE 


WHICH CAUSES THIS ERROR May OF SEVERAL 
SIN THE DAYFILE, 


06727778 09.03.50, PAGE 2 


THE GUILTY ENSTRUCTION WAS AT 192.° 


NORMAL TEPMINATION 
TRANSFER ADDRESS 


25 STATEMENTS 


0000 
0000 
ov00 
Orr? 
0000 
ou00n 


0000 


“0000 


n000 
0136 
o0on0 
0000 


00000. 
00055 
nono 
ons? 
00000 


0015? 
0c000 
“6000 - 


ee Ran 


0061 
Onno 
0000 
6000 
0000 
0000 


2 SYMAOLS 
3 REFERENCES 


CURD 
C(R2be 
Cine 
Cinaje 
CIASIe 
Cinaps 
CtAThs 


46550 02550 
N7060 90080 
“0000 On000 


00000 00000 
i 


~ @1NL0- oon12 


rr Pen aatann 


THE ENSTPUCTION AT 213 WAS bg 


0000 0000 0000 0000 on00 


4600) «(0618 


00000 
§1600 
02000. 


00000 
46000 


ary ten 


46000 
onoot 
oottl 


00000 


46000 


O777 0134 4000 


00000 00000 00000 onn0r 
04000 0004) 00000 onO2! 
00000 00000 40000 onnot 


6000 46000 61009 46n0¢ 


COMPASS 365-4670. 06/27776 09.03.50. PAGE ' 


TS1a0DP 
STORAGE ALLOCATION. 
ACNRESS LENGTH BINANY CONTHOL CARNS, 
0 6 InfFNt 1STaVOR 
6 €ND TSTAHOR TRANSFER ADDRESS 


ENTRY POINTS. 


TSTADOR oe 


EXTERNAL SVMAOLS. 


SvSe 
LOAD MAP - TSTADOR CYBER LOADER 124-470 06/27/78 09.03.516 PAGE 1 
FwA OF THE LOAD wt ; 7 
Lwaet OF tHe LOAD 15? 
fee) 
a TRANSFER ADOAESS -- TSTADOR ae 
PROGRAM ENTRY POINTS <-- TSTAOOR at 
PROGRAM AND BLOCK ASSIGNMENTS. 
BLOCK aDOnESS LENGTH riLe Oate PHOCSSR VER LEVEL HARNWARE COMMENTS : 
L] 6 .60 06/27/78: COMPASS 3.5 470 
ak ie 60 SL“-SYSLIB «695716778 COMPASS 365 470 PROCESS SYSTEM REQUEST. 
: MrF 60 NR2=) «CYAN 7S-SN) eLOT/R6H 05715778 
09.03.47.N0N00ST FROM 73H 
iS e 
2028 CP StCONDS 132008 CM STORAGE U €0 00.03.47.1P 00000320 woHns - sue’ Gets a tie w 
09%,03.47,D0N. PSOe02 THe T2CTOLUASMILLER 
09.03.50.COMPASS,. 


. 09.03.51, ASSEMBLY COMPLETE. &7300R SCM USED. 
. ; 09.03.5)6 0.073 CPU SECONOS ASSEMBLY TIME. 
. 09.03.51.160. 
09.03-SR.ERROR MONE 20f. ADDRESS 2000119 
09.03-52.0P 00001088 WOHDS - FILE OuTPUuT » OC 40 
09.03.52.4S 3584 woRDS ¢ 7168 MaK USED) 


09.03.52.CPA 2126 SEC. 2126’ ADJ. 
09,03.52.10 064) SEC. 264) ADJ. 
09.03.52.C" 9,940 KWS, 2600 ADJ. 
09,03.52.$S }.371 

09.03.52.PP #47) SEC. DATE 06/27/78 


Q9,03.52.£) END OF JOB» SH 
‘ 


OUTRANG 


0 7170000007 


5170000000 
1 67150002121 
5150377776 
“2 7170006666 
5170377776 
3 46000 . 
4 46000 a 
7130003333 
5 46000 Meg 
©0 6 46000 ° 
1 7160247021 
\o 10 
475008 cM § 


MODEL 74 ASSEMBLY 


LOAD MAP = OUTRANG 


FwA OF THE LOAD hl 
LwAe] OF THE LOAD 16 


TRANSFER ADORESS <= OUTRANG 
PHOGRAM ENTRY POINTS =~ 


PROGRAM AND BLOCK ASSIGNMENTS 


BLOCK AODRESS LENGTH 
OUTRANG Lit 10 
CPU.SYS 121 40 


055 CP SECONDS 


COMPASS 326-4676. 


IDENT OUTHANG 
ENTRY OUTHANG 
POH ORHRRHRO LONDEN O DUNNE OUUEOHODORAOHEOHNDOEUUNEDORHRHUNEDHROERE ERR CUObOLCCnene 


AVORESS OUT OF RANGE 

UNDER CONTROL OF A MODE 6 CONTROL CARD EXECUTION CONTINUES WHEN ADORESSE 

OUT OF RANGE ARE REFERENCED. we 

le LOADING FROM AN ADDRESS OUT OF RANGE CAUSES A LOAD FROM ABSOLUTE 
ADDRESS 0. 


2e STORING OUT OF RANGE ISA NO-OPERATION (NO STORE 1S DONE) 


ahha L LITT LI TELL L TTY TTT TTT TTT T TTT TT reyes 


“OUTRANG = 5X7 1 


SAT 0 
SxS RAY 
SAS 3777768 
SX? 66668 
SAT —- 3777768 


$X3 33338 


END OUTRANG 


2 SYMBOLS 
0 REFERENCES 


TORAGE USED ~ 31 STATEMENTS 


0.095 SECONDS 


CYBER LOADER 1.4485 01/08/79 1029.05. PAGE 
1 
1 
1 

OUTRANG Hk 
e 

FILE DATE PROCSSR VER LEVEL HARDWARE COMMENTS 

Leo 01/08/79 COMPASS 3.6 476 : 
SL~SYSLIB = 11/15/78 COMPASS 3.6 476 PROCESS SYSTEM REQUEST. 


13500B CM STORAGE USED 1 TABLE MOVE 


01/08/79 10.29.05, PAGE 


e. 
s 


° 
e 
e 
° 
* 
od 


rere CALHANUL FALKAUL OMP. 
Pp 000123 ad 000200 80 000000 
RA 175600 Al 000001 81 000001 CtAl)= 0000 O0v0 0000 0000 0000 C(Blie 0000 0000 0000 0000 0000 
FL 000200 A2 000060 H2 000002 CtA2)= 1505 1520 0000 0000 0061 ClH2)= 0000 0000 60000 0000 0000 
EM 000600 A3 00005? 83 013274 CIA3SI= 0000 0000 0000 0000 oo00 C(H3)= ® © OUT OF RANGE @ @ 
RE 000037 A& 000001 8B4& 000201 CtA4)= 0000 0000 0000 0000 0000 ClH4)a ®@ ® OuT OF RANGE ®@® @ 
FE 000000 AS 377776 BS O00111 CtAS)2 ® ® OUT OF RANGE ® ® C(b5)= 7170 0000 0751 7000 0000 
MA 0013000 , A6 000122 B6& 040200 CtA6é)= 0130 0000 o000vu 0000 0000 C(B6)2 * ® OUT OF RANGE @ @ 
A? 377776 BT 027756 CLAT)= ® © OUT OF RANGE ® © C(87)« * © OUT OF RANGE @ ® 
x0 0000 0000 0000 49000 ov0do 
kl 0516 0420 0000 0000 0000 
X2 3505 1520 0000 0000 Ov61 
X3 0000 0000 0000 0000 3333 
x4 0000 0000 0000 0000 0000 
X5 0000 0000 0000 0000 0000 
X6 05136 0420 0000 0000 0000 
X7 0000 0000 0000 0000 6666 
00000 00000 00000 00000 00007. 00000 00000 00000 00000 0005456310 03130 00054 54710 51100 00002 03110 00055 
00056 64550 02550 00000 46000 00000 00000 00000 00000 
00060 15051 52000 00000 0006) 00000 00200 00000 0000) 07040 00060 51600 00001 04000 00063 00000 00000 
00064 04152 00000 00000 00000 00000 00000 Oo0VU 0016) 40000 00000 02000 00111 00000 00000 40000 00000 
00070 34071 75700 00000 00000 .00000 00000 00000'00000 - 00130054000 00000 01000 00001 
00100 $4000 00000 01000 00001 00005 00000 00000 00161 00000 00000 00000 00000 00104.00000 00000 00000 oolet 
0010S 00000 00000 00000 00000 O01IOLI 7252 42201 16070 00111 71700 00007 S170U 00000 71500 O11 513503 77776 
00313 71700 06666 51703 77776 
00214 46000 46000 61000 46000 46000 71300 03333 46000 46000 46000 61000 46000 46000 72602 47021 20650 
00120 01000 OVl23s 61000 46000 04000 00334 00000 00000 01300 00000 00000 00000 04000 001223 00000 00000 
00124 51100 00003 03210 00324 54610 04000 00122 46000 $1100 00066 03310 00130 51100 o0}21 04000 0013) 
00130 71100 00130 20160 46000 . 136601 13161 13660) 46000 51600 vdl22 106)1 46000 §1100 00008 01000 00121 
00134 20652 02000 00123 46000 51100 00001 031330.00135 04004 00136 61000 46000 52100 00001 03110 00136 
co 003490 71602 20314 04000 00134 20150 36661 01000 00123 ‘04004 00142 61000 46000 71602 20314 20652 36662 
Ae 00144 53160 20173 03310 00142 03010 00142 51100 0000) 03110 00144 71100 0000) 04000 0014] 61000 46000 
oO 00150 71603 24616 1266) 20651 01000 00123 61000 46000 04004 00152 61000 46000 73660 20630 1216) 73610 
00154 20123 03210 00150 2015) 13116 20636 52600 00160 74660 36116 20123 46000 04000 00150 61000 46000 
00160 00000 00000 00000 00000 60000 00000 04004 00161 00177>60000 00000 04004 00177 
MFS NUl= CYB74-SN108 5C/ROB  =—=—s«a 714778 
10.25.10.DUN00K) FROM 70H 
10.25.10.1P 00000384 wOROS = FILE INPUT » DC 06 


10.25.10-D0NT5. 


001A9688301896,MILLER 


10.25.19.REWIND OUTPUT. 
10.27.49.COMPASS sLO=BR. 


10.29.04. ASSEMBLY COMPLETE. 475008 CM USED. 


10.29.04, 0.228 CPU SECONDS ASSEMBLY TIME. 
1029.04 .MUDE 96. 

10.24.04.LG0. 

10.29.05. WE GOT THIS FAR 

10.29.05.0MP. 


10.29.05.0P 00000832 WORDS = FILE OUTPUT » OC 40 


10.29,05.M5 3584 WORDS ( 7168 MAX USED) 
10.29.05.CPA 0445 SEC. 0445 ADJ. 
10.29.05.CP8 e282 SEC. e202 ADU. 
10.29.06.10 e316 SEC. 0316 ADU. 
10629.96.CM. 12.493 KWS. 0762 ADJe 
10.29.06.S5S 1.606 ° 

10.29.06.PP 10.161 SEC. DATE 01708779 


10.29.06.EN END OF JOB» OH 


TT-8 


TESTRAD 


73 0066666604000001315 


Stooo000, 
vorn 


3170000000 


46000 
46000 
46000 
46000 


0400000000 


7160247021 


OuNp 
> 000123 ao 
Ra 344400 al 
FL 000200 a2 
fr roo7ce ad 
RE 000055 As 
FE OCoD00e As 
“MA 001200 a6 
ar 
RO TTrr ofr? 
ah 0516 0420 
R2 1505 1520 
Rd 0000 oco000 
Re 0000 oc00 
RS 6000 0000 
RG 0516 0420 
my 67100 6666 
00000 71006 
00086 4 6a8Se 
00060 1$051 
00066 0412 
00070 = gaorh 
C0100 §=—« Sane 
00105 00000 
coll? Si7eo 
0011S 6000 
00120 ol000 
00124 8 $8100 
00130 71100 
00134 20682 


000200 
00000! 
000060 
000057 
ococel 
200112 
o00122 
000000 


TTT? 


0000 
0000 
0000 
0000 
0006 
0000 
66006 
66666 


025580 
52000 


60000 
18788 
0¢000 
00000 
00000 
46000 
0012) 
00001 
00130 
Oooo 


pata 


TESTRAOD 


eoeee 


TESTHAD | 


COMPASS 325-4706 


71006666660400000115A 


IDENT 

ENTRY TESTHAD 
DATA 

SAl MATA 
AK? La 

SAT 0 

to a 

NO 

NO 

NO 

wo 

ENORUN 

ENN TESTARAD 


87300N SCH STORAGE USED 
MODEL 174 ASSEMBLY 


EXCHANGE PACKAQE 


or 
766 
0000 
0000 


0000 
0000 
0040 
0000 
0000 
06000 


00000 
00000 
01000 
00000 
04000 
61000 
6lo0o 
03110 
20160 
00123 


000000 
000001 
000002 
08279) 
000208 
oo01l2 
000200 
027756 
6666 
0000 
006) 
0000 
0000 
0000 
0000 
0115 
00118 


46000 
00061 


00000 
00000 
ooo0! 
60000 
00000 
“6000 
£6000 
0012s 
46000 
46000 


ONP, 


Ctalpe 
Cta2pe 
Ctasjpea 
Ctaape 
CiASpe 
Ctaete 
CtaTis 


0000 
1505 
0000 
0000 
Shio 
0130 
?ioo 


00000 


00000 
00000 


00000. 


00000 
90005 


ONT LOe24052 


0011 7e86000 


04000 
Sesto 


13661 


Sitoo 


0000 


1520 
0000 
0000 


0008. 


nooo 
#666 


¢2000 


60000 
00200 


00000 
00000 
00000 
32422 
71602 
00136 
04000 
RIL) 
onoot 


36 STATEMENTS 


0.015 SECONDS 


0000 
0000 
0000 


Ono0v 


lito 
S000 
6604 


00000 
n0000 


00000 
n0000 
00000 
01330 
e702) 
00000 
00122 
1366) 
O3iio 


0000 
0000 
0000 
0000 
aT 
0000 
0000 


00000 


oolst 
00000 
ootel 
ootn2 
20650 
00000 
46000 
460n0 
00135 


0000 
0061 
0000 
0000 
6000 
0000 
0115 


3 $V 
.§ PE 


Ctplse oo 
Cin2te 00 
C(BIpe 
CiBS}ea 
CI(nStse §) 
CtH6pe 
CtAT»e 


00054656118 03110 


0?v40 00060 
40000 60000 


00100-54000 00000 


00000 00000 
71006 66666 


01300 60000 
$1100 00066 
51600 e0122 
n4008 00116 


06/27/78 08.38.20. PASE 


MROLS 
FERENCES 


060 0000 0000 0000 oooe 
00 0000 0000 o000 oono 
© © OUT OF RANGE © © 
© © OUT OF RANGE © © 
10 0001 «3810 ThOBe 6000 
© © OUT OF RANGE © « 
© © OUT OF RANGE © © 


00056 Sa710 Slioe 
51600 coool 04000 
02000 0011) ' 00000 


01000 0000! 
00000 00000 00204-00000 


04000 00115 - Sthoo 
00000 00000 © 04000 
03310 001830 . : Siioo 
10611 48000 S100 
Al0Nn aAnnn Gian | 


? 


ae 


O000t 03110 00085 


00069 60000 00022 
00000 40000 00000 
00000 00000 0016! 


Colla ROTED 46000 


00121 00000 00000 
002! 04000 00131 
00001 01000 ool2t 


Nnnny NIN ANFte 


COMPASS 3.5-470. OH/2777H 0f.38.2N- PAGE | 


TESTRAD 
STORAGE ALLOCATION. 
ACORESS LENGTH BINARY CONTHUL CARDS. 
0 40 IDENT = TESTRAD 
10 END TESTHAO 


ENTRY POINTS. 


TESTRAOD ¥e 


EXTERNAL SVHBOLS. 


SYS= 
LOAD MAP + TESTHAO CYAER LOADER 124-470 06727778 08,38.2).~ PAGE 1 
. 
rw fwa OF THE LOAD au 
N twach OF THE LOAD 161 
TRANSFER ADDRESS -- TESTRAO an2 
PROGRAM ENTRY POINTS <~ TESTRAO at2 
PROGRAM AND BLOCK ASSIGNMENTS. 
BLOCK ADOHESS LENGTH FILE oate PHOCSSA VER LEVEL HARDWARE COHKMENTS 
TESTRAO got to GO 06/27/78 COMPASS 3.5 470 ‘ 
S$¥S.PM 21 40 SL-SYSLIB 05/16/78 COMPASS 3.5 470 MEF |0ONNB2=)- CYBLTS-SNE acersnee 05/15/78 
06.38.17.,00N00)1 FROM 73 
06.36.17. 1P 00000192 wOHDS - FILE INPUT + OC 0% 
Peep pea reer PSH eO2THoP2CTONLACHILLER 
7 NOS 132008 CM STORAGE USED 6.36019.COMPASS. 
o2e-Ce Secon 08.36.20. ASSEMBLY COMPLETE, %73008 SCM USED. 
06.38.20. 0.066 CPU SECONDS ASSEMBLY TIME. 
08.36.20.160. 


06.36.23 .0MP. 
08.38.21.0P 600008096 WORDS - FILE OUTPUT » OC 40 
06.3062R.MS 3586 wORDS ( 20752 MAX USED) 


08.38.21.CPA ett4 SEC. ofl% ADS. 
06.38.21.10 e631 SFC. 063) ADS. 
06.386.21.CH 9.665 KWS. 0599 ADJ. 
06.3866213.SS 1.335 

08.36.21.PP @.269 SEC. DATE 06/27/76 


06.38e21.€3 END OF 308» SH 


f : a : ’ ae! A : F 


Lesson Se] 


MACROS 


LESSON PREVIEW: 


THIS LESSON COVERS THE DEFINITION AND CALLS oF MACROS 
AND OPDEFS, THE USE OF.MICROS AND PSEUDO-oPS, AND CON- 
DITIONAL ASSEMBLY, 


REFERENCES: 


CHAPTER 4-7 COMPASS ReFeRENcE Man, #60492600 


| TRAINING Arps: 


VISUAL sET V9 


- Provects: 


PROGRAMMING PROJECT 6 
OBJECTIVES: 
AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE 


ABLE TO: 


1, WRITE PROGRAMS THAT UTILIZE: 


a, MACROS 
B, OPDEFS 
c. MICROS 


D. PSEUDO-oPS 


2. USE CONDITIONAL ASSEMBLY 


MACROS 
Definition 


DEFINITION 


Often a sequence of code should be assembled many places in a program. Rather 
than writing out the code each time it is needed, it would be helpful to give a name 
to the sequence and then just use the name each time you want the assembier to bring 
in the code. A sequence of instructions that will be assembled whenever called is 

@ MACRO. For added convenience the programmer could specify certain elements in 
the MACRO as variable; that is they can change. Each time the MACRO is called, 
diferent values could be given for these variables or parameters. The assembler 
would then insert the given values for the parameters as the code {s assembled, 

For example: 


torwy = wacresT 
List Le@ DeGen 


Furey ef 
e 
cowe macag 6 
$a) a 
or? oft 
$a? a 
Cane 
e 
e 4 $T Cour ue 
@ Silseseces « $4150 we : : Crue al 
a71} ar? ott : come ol 
1 Si7eereces © gar eye : Come eo! 
tee: cows al 
Coue e2 
Siieeecoce « Sat e2 , . Cree el 
2 art or? o3) 7 Cnwo oe! 
*1%eceeoo8 © ga7 a2 : cowe el 
; Pwre cows el 
: gunaun , 4 
3 7160207621 $26 e8f WOR, 160 Cnleye ot 
2ve*o L146 eon Curanwm .) 
& 810e0ce0ecs 2 O81 ensvege Eutmum ot 
S  PIFPIVITIVIVGVTIIIIV mye Oars e3 - 


COEF MAT SYPOULS OFF ImED BY Commess, 
es SYS$e 


COmTemy OF LITERALS BLOCK. 


6 S00eergennoncceece2 a 
? ; aan enn 
a23008 Ce sToeene UStO 2e STargoeurs 9 Symons 
; moet, 73 asseeery 0.38% S£CoNOS @ OCreetucts 


MACRO 


* 


Type 1 FoRmMAT 


* SINGLE “INSTRUCTION” TO CALL A SEQUENCE OF CODE 


* LIKE AN IN-LINE SUBROUTINE 


eon WORDS TO SUM 


I.E. 
SUM MACRO 
THe Cau: 
SBI 
sm BUPA, 
CALL ACTUAL 
PARAMETERS 
BUF BSS 10 
A BSS 1 
THe Macro DEFINITION: 
FORMAL 
MACRO_NAME PARAMETERS 
| we 
SUM MACRO DATA, ANS — 
LOCAL ADD 
SX7 0 
ADD SB1 Bl-1 
ae SA1 DATASB1 
SYMBOL 1X7 X1+X7 
PL B1,ADD 
SA7 ANS 
ENDM 
9-3 


MACRO CODE 
INSERTED HERE 
BY ASSEMBLER 


CODE TO BE 
INSERTED IN LINE 
WHEN THE MACRO 
IS CALLED 


COMPASS 3.5-470. 


AINARY CONTHOL CARDS. 


1OENT 
€N0D 


ENTRY POINTS. 


HOVTbO0 


avo 


jhe 


FATERNAL SYMBOLS. 


Mov?Té600 
STORAGE ALLOCATION. 
ADDRESS LENGTH 
0 100 
100 
aoo 
SYSs 
\o 
| 
AS 
mMaVIEOO 
<yMPOLIC PFFFOENCE TAALE. 
ann %0 ePencRane 
aNnswen 0 PUNGAAM®e 
OVINE 46 pvo5Rrane 
ENDIRLK a) PHOGHaAMe 
END2PLK 54 PONGeane 
FAD TALa 65 PaANGHaMe 
ENDSALK 16 eangArae 
LPLOCKT so 
LALOCHS 14 
LALOCK? at 
LALOCK) Ww 
LALOCKS 12 
war ALK 14 
MINALA " 
wee 55 PANGRaMe 
oPFRann 20 PROGRaAM®e 
SuRt as PROGRaMe 
S¥S? 0 FXTEANAL® 


|__| ei eet Lemmerern, =” ~ oa bee bs ° 5 ae bs rs Py : oo a ee 2] a | | a = 


2/703 
2716 
2714 
2722 
Wis 
2/6) 
3702 
3720 
rad 
Ison 
Js4e 
e734 
2/52 
3713 
3449 
3/50 
2/53 
2715 
2716 
2/7 
2/735 
Was 


eeu 
274i 
e7er 
e730 
37?) 
Js44 
3/45 
374K 
S747 


3/74 
3745 
S744 
3747 


3/0) 
2/\p 
2719 
2726 
2/4? 


DA 


3335 


2/55 § 
3402 
27ns 
2/4HA § 
WoT 


3769 
3748 
3748 
1s6A 


3746 
2725 
7/06 
avert 
3445 


COMPASS 3.5-470, 


16 
Js20n 
2749 
3709 


3450 
3750 


2/42 
2743 
2746 


06727778 09.13.58. PAGE 1] 


“rr NR2- CVATTIS-SNI: SLAT/NGEA 05715/7A 


09.13.56,.00N006U FROM 75% 


09.13.56.1P 00000512 WOHDS - FILE [INPUT 
PSH eOZTAST2ZCTOLIAMILLED 


09.33.56.D0N. 
99.1357 COMPASS, 
09.23.58. ASSEMALY COMPLETE. 
09.13.50. 0.179 CPU SECONDS 
09.33-5A.L60. 

09.23.59. DMPCDDD LIT) 
09.83.S9.FNIT. 


09.13.59.0P 00001792 WORDS - FILE OUTPUT » DC 40 


09,13.59.MS 39A& wOokDS ¢ 


09.13.59.CPA e729 SEC. 
09.183.59.10 0651 SEC. 
09.13.59.CM 12-A50 KwS. 
09.13.59.55 

09.13.59.PP 2.964 SEC. 


09.53.59.E) END OF JOR> SH 


04727778 09.13.56. 


$ 3744 


$ 3710 § 3736 S$ 3742 § 
S 3735 5 al S$ 


2/48 3708 3722 
3703 3406 3723 
3704 3721 yee 


#7300A SCH USED. 


ASSEMALY TIME. 


10752 max USED) 
0279 ADJ. 
265) ADJ. 
076% ADS. 
1.645 

DATE 046727778 


PAGE 4 


e OC 04. 


ae 


MOV7600 


Sivecoevei « 


: 20 
Chooeeedeeecocoeesos 
SLLO00002Z9 « 

Srz20000001 » 
S1300c00z7 « 
$140000023 


e 


36612 
36734 
3160000000 o 


. Sireecoozs 
Sizeeoesrs « 
S$130000026 
Staeooee2r « 
38612 


36794 
Siacesecer « 
Siveeccecs 


° 


o180éc0000 
61200000! 
Sisteceess » 


106 
Siesecceese « 

Griieceoes 
Osi Peeeese « 


0200000090 © 
Siloceceeze « 
81200000F1 © 
S1s0ecsez2 - 
$140000029 « 
37601 
37794 
$160000004 » 
Si ?eeoeeas © 
6110000000 
6120000088 
$3510000S55 « 
10655 
$161000030 « 
6111000001 
0512000051 « 


MOVE 


MOVE]. 


ANSWER 
OPERAND 
ADD 


ooco0o0el 


ENDIBLK 
suat 


44000002 


toent 
List: 
ENTRY 
MACRO 
LOCAL 
sal 


COMPASS 3.5-470,. 


M0OV7600 

“4 

ano . 
PARM1 ePARN2,PARM) 
MOVEIL 

0 

Panne 
PARM2c@) 

KS 

PARMIJ+Q1 

Rhel 
B1.82eMOVE) 


302030408 obo 78 


OPERAND?0 
OPFRANDe) 
OPERANDe2 
OPERANDe3 
nbon2 
RJoNe 
ANSWER CO 
ANSWER} 
OPERAND?4& 
OPERAND?S 
OPERAND 6 
OPERAND?? 
Kbex2 
RJons 
ANSWER O® 
ANSWER?) 
LBLOCK2 sSuBTsADD 
0 
LOLOCK2 

SUBT<¢®@) 
x8 
a00°8} 
BObel 
A1,82096000008 


ad0 
OPERAND&® 
OPERANDS) 
OPERAND?2 
OPERAND?3 
n2-Al 
MJ=-N4 ; 
ANSWER OA STORE RESULT 
ANSWER 6S STORE RESULT 
LBLOCK3eMULTe ADD 
‘ 
CLALOCKS 

MUL TRI 
a3 
ad0+A] 
Abel 
Al .M2090000002 


STORE RESULT 
STORE RESULT 


06/2777TH 09.13.88. 


PAGE 


HOVE 
move 
MOVE 
Move 
MOVE 
MOVE 
MOVE 
MOVE 


MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 
MOVE 


2 


COMPASS 3.5-470, 06/27/78 09.13.58. PAGE 3 


Mov?r600 
ENDM MOVE of 
Sy 0800000020 « END2@LK EO a0 
$5 S$2110000020 MULT SA} OPERAND eo 
S$i20000021 « SA2 OPERANDe4 
$6 5130000022 « $a) OPERAND 2? 
$140006023 « GaAa OPERAND?3 
SY 42612 1X6 mien2 
a2736 nT RJOKS 
$160000006 « SA6 ANSWER 06 STORE RESULTS 
60 Sirecoeoor « : Sa? ANSWER? STORE RESULTS 
MOVE LBLOCK4 DIVIDE »A0D 
61130000006 $81 0 MOVE ef 
6h 6120000082 $82 LBLOcKs MOVE et 
62 5151000066 « #8000003 $A5 OLViO€ +B) : MOVE of 
80655 ON6 xs MOVE ef 
63 $161008030 « SA6 a0Deb1 MOVE el 
6tL1000008 $8l Blel ; MOVE el 
64 0532000062 « NE 81820000000) MOVE of 
ENOM MOVE ef 
65 04000080030 ¢ CNDIBLK €Q ado 
66 $110000020 « OlvioEg SAL” OPERAND +0 
$120000021 ¢« Sa2 OPERAND +} 
rr 67 5130008022 « SAj OPERAND?2 
\ 5140000023 « Sas OPERAND+3 
fon) ye 2780) PRI ab, 
27202 PK2 n2 
2atei NKI Lae 
; 24202 _. - NM n2 
Th «27303 PRY x3 
27464 PRe x4 
24303 NAD nJ 
24404 NS K4 
V2 «444621 : FRO K2/ni 
4474) FUT M4/K) 
5160000010 « SA6 ANSWERS STORE RESULTIFLOATING POINT) 
¥3 Sivecooceis «© SAT ANSWERC9D STORE RESULTIFLOATING POINT) 
26676 UK6 x6087 
26767 UK? X7e86 
Te 22676 ; x6 nOeaT 
2276? : LxrT x7 .H6 
5160000012 « SA6 ANSWERO1O STORE RESULT IINTEGER) 
1S $170000013 + sar ANSWERe)3 STORE RESULT CINTEGER) 
Te 7160247021 END4BLK ENDRUN 
4 LALOCK) £QU ENDIBLK~ADDe! 
ii (LOLOCK2 EQU ENDZULK-SUBT¢$ 
tl. LBLOCK} EQuU ENDIULK-MULT¢§ 
12 LALOCKS €0U ENDSULK-OLVIDE 62 
So LALOCKY €0uU LALOCK) *LALOCK2¢LBLOCKI+LALOCKS 
4 MAXBLK MAX LOLOCK EOL BLOCK2 cL BLOCK3 +L BLOCKS 
i HINBLK MIN LOLOCK ) cL BLOCK 2 cL BLOCK ICL ALOCKS 
loo END abo 
- €7300B SCH STORAGE USED 10) STATEMENTS 21 SYMBOLS 000003 INVENTEO SYMAOLS 
MODEL 174 ASSEMBLY 0.122 SECONDS 76 REFERENCES 


+ acs al 


s LOAD MAP = MOV?ODD CYAEH LOADER 1.4-470 04/27/7768 09,193.59. PAGE I 
Fwa OF THE LOAD tol 
wae} OF THE LOAD est 
TRANSFE® ADDRESS -- a00 14) 
PROGRAM FNTRY POINTS -- “OV 7600 141 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADDRESS LENGTH FILE ' pate PHOCSSR VER LEVEL. HARDWARE COMMENTS 
MOv7600 Mn 100 = A600 06/27/78 COMPASS 9.5 470 . 
SV¥S.RM 215 40 SL-SYSLIEB 05/16/78 CUMPASS 3.5 470 PROCESS SVSTE™ REQUEST, 
-929 CP SECONDS 132008 CH STORAGE USFO . b TABLE HOVE 
\O 
U 
~ 
OuNP QFL ATIVE OMPCLED OD TT) 
notnl 00000 O00 UNNHAN DONNY : 90000 Hn0H0 ANnOW ANANT 0000 00006 noon0 on0l3 
Oolte 0000 ONNN0 VOnAN nnnj?T 99000 On000 AOnaN nonn) . TTT? VePTT veTtIT TITTH 00000 00900 00000 on002 
00120 00000 009N0 ONnnNnn OOnIs 721% Nn000 nOnnO nNnONO 17205 25262 52525 26252 00000 00000 00000 onn02 
ONl2e 00000 0000 voonn Anant 00000 ARH00 oODNY ONONN 0013!-90000 00000 n0000 onool . 00000 00000 00000 on002 
ood) 09000 00000 vo0n0 00001 : 
oot le 09009 09090 uUnnan Onnns 90000 0000 non00 onnnSs 00000 00000 90000 on006 00000 00000 oo000 onooTr 
Oo1en 00000 009n0 vnonn o0010 Siion on19t sizou ont 513100 00133 51409 00134 27101 27202 246401 24202 
00166 27308 274N% 24101 260% 4467) 64743 SiAOU oot2t 51700 00122 2667 26767 22676 22767 51600 00123 
Oo1SA SETON 09324 BIN0n GENnD 71602 S7N2b 270650 4an00 91000 00213 61000 44000 05120 00fSl 61000 46000 
00156 04009 00141 6100 “A000 Sttno ontat si200 onir2 $1300 00133 51400 00134 37621 37734 51600 00115 
00169 51700 00116 61109 00000 61200 00011 alono 46000 51510 00166 10655 46000 51610 00141 613820 00001 
00164 05120 00162 B100n 46000 06000 Oni«! 41900 4Ann0 51100 00131 §1200 00132 51300 001399 Sis00 00834 
00170 &2612 427368 SiKOn 00117 51790 Ool2Oo 41309 oonnn £4200 00012 61000 46000 SISIO OO177 10655 46000 


OO? Si6in HO14l Ht1IH D0001 05120 90173 Alnou 464n00 04000 00141 41000 44000 SiL00 COLLIE $1200 00132 


MACRO 
Type 2 format: 
i.e. 
LOAD macro 
The Call: 


LOADS X2 


LOC LOAD uy 


LOCATION SYMBOL 


Y . DATA re 


DATA FROM Y 


The Macro Definition: 


LOCATION SYMBOL 
MACRO NAME 


MACRO LOAD, TAG,REG,AQDR 
TAG SA.REG ADDR —— 


ENDM ’ FORMAL PARAMETERS 


MACRO 


eos 


Silooooves « 


5120000022 ¢- 


425l2 
5130000020 + 
S140000v2ag) «+ 
42634 
%2656 
5160000036 ¢ 


Sllvooouze + 
Sl2vo00vues + 

425le 
Sl3v000023 + : 

5i40000024 ¢ 
42634 

42656 
5160000037 + 


SI10000031 ¢ 
5110000035 + 
7160247021 
0000000U00000000NN0) 
0000000000000N000001 
4 


475008 CM 


COMPASS 36-476. 01708/79 16041.44, PAGE 1 

1OEWT MACHO 
ENTRY HEGIN 
LIST Me-teete 
MACRU SAMePsQeReSol FORMAT I1 
Sal T 
SA2 Ss 
fas AL*xKY] 
SAY ) 
SA4 rT] 
1x6 K3°X4 
1x6 X5*Ko 
SAb p 

SAM tNUM 

BEGIN HSS 0 PLACE TAG ON NEXT LOCATION: 

Peu SAM MoMtlomMe2eho3 : 
SAL Meg san of 
SA2 Mee SAM el 
1X KL®x2 SAM ot 
Sag “ SAM el 
SAG Me} SAM of 
1X6 X3*X4 SAM ol 
1X6 A5 9X6 SAM o! 
SAb Peo SAM el 

Pe) SAM H+39Mo4eMe5omeg : 
sal Heo SAM ol 
SA2 Mey SAM ol 
1xS X1exe SAM ot 
Sag Mey SAM el 
SA4 MO Sam ol 
1X6 K3OXx6 SAM el 
1X6 K5 9X6 SAM a | 
Sah Pel SAM el 
ENDM SAM ol 
LIST = 

Pe2 SAM M+OoM+TeoMeBo Meg : 

Peg SAM Toleloteaetes i] 
tENDHUN 

M VATA = 1089 39405069790 0900 HFS NKi= CVHTé-SNiv8 SC/nOH IVALYAL. 

1 VATA = Lede 303 o £6.38.07.0UN0003 FRUM 70H 

P 4SSZ 4 a8 16.36.07.1P 00000256 nORDS ~ FILE Inpur » UC us 

END BEGIN ; e Peseta taUONet 3s UVOLACOHUIs LODO eMILLER | 

6.38 REWIND P 

STOHAGE USED 61 STATEMENTS fesiec te cucniee was 

MUDEL 73 ASSEMBLY 0-265 SECONDS 16641.46. ASSEMPLY COMPLETE. 4750u8 cM USED. 

. 16.41.46, 0.410 CPU SECONDS ASSEMULY Tint, 
16041.46.LG0., 
16.41.46. 0MPO199.200) 

@ 16.641.46,UP O0000K32 wOHDS - FILE vUTPUT » UC 40 
16.418.46.MS 3584 wURDS Tho MAAK USED) 
16.41.46,.CPA e293 SEC, e249) AU 

eo 16.41.46.CPU e266 SEC, ecbb ADS. 
16.41.46.10 e317 SEC. eJl/ aude 
16.41.46.CM- 16.162 KWs, e906 ADJ 

@O = 16.41647.55 bevol 
16041.47.PP 2.942 SEC, DATE vlsoysiy 


16e41.47.ES END OF Yous On 


3 


LOAD MAP = MACHO 


FWA OF THE LOA ini 

tLWAel OF THE LOUAD 213 

THANSFER AUDRESS == BEGIN iil 
PROGRAM ENTRY POINTS «= MACHU 

PROGHAM AND BLUCK ASSIGNMENTS» 

BLOCK AUURESS = LENGTH FILE VATE 
MACHO dhl 42 Leo 

cpu.sys 153 - 40 SL=Sy¥sLiv 


©055 CP SECONDS 


\O ° 

HA DUMP RELATIVE UMP (1119200) 
0012) 51100 0023% 51200 0v133 4252 514500 
Oo1ks $1600 00147 S11U0 00137 Si2v0d 00136 
00120 51100 Yulee S1200 OVl4l 4dol¢ Slsuu 
00124 51200 00145 42512 46000 5i3uu vols 
00130 01000 00155 b1U00 40000 VUVOU DUULY 
00134 00000 00000 vOvOU vuvD4 vuvuU VoULU 
00140 00.000 VOU0U OUULU vuu1O OvUUY YOUU 
00146 OOU0U OLHOY VOUvOY BuUvUZ vuuUuNd VoULU 
00150 00000 VUOOU OVOUY UId1) Vouue vovUU- 
00154 01300 OOVHU UOLOU vovLU V4uuv VULSE 
00160 51100 VOUO6 03410 UUlbd Sh1v0 uuId3 
OUlOs 51600 00154 1061) 46000 Silivu oovol 
00170 04004 00170 61000 46u0N siivu vovdl 
OUTS 04004 0017% 61000 46000 Tloved 203514 
00200 03110 00176 71100 vouol 


1it 


PHOCSSR VER LEVEL HAROWARE 


135008 CM STORAGE USED 


001s: 
4eohe 
OOlSs 
51400 
vouud 
ouu0U 
buoue 
Ouuou 
vuuud 
VuUUO 
04000 
Oluvu 
U3lio 
2002 


CYBER LOADER 164-485 PAGE 1 


01/06/79 10042046. 


COMMENTS 


01/08/79 COMPASS 3.6 476 
11/15/78 COMPASS 3.6 476 


PROCESS SYSTEM REQUEST, 


1 TABLE MOVE 


46000 $1400 00132 42634 426056 

40000 51300 00134 513400 00135 42634 42656 51600 
-46000 51400 00140 426034 42656 526000 OOlS! Siluo 
00144 42034 42656 516000 00152 71602 47021 20650 
vouul 0LVU00 GOL0O 00000 OOLvv2 00000 00000 uvuv00 
ouvUds O0UVUU 00000 VO000 O0U06 00000 vooou vuVvLD 
guuil QV00U 00000 VOOV0 COULD 00000 0U000 00000 
ouvos OOIL47_OLUVN YOUVUU YUU0D0 00030 

ouuud 0UL00 GOVUN 00000 vOvEe2 04000 00166 vuv00 
00000 51100 OOUU 03110 00156 54610 04000 00134 
00163 TllUG 00330 2060 46u00 13661 1316! 13601 
0u1S3 20652 01000 00155 460000 $3100 00008 O31}0 
00170 7hoO2 20314 04000 00166 20150 30661 01000 
36662 53160 20173 03310 00174 03010 51300 


00174 


00150 
00146 
46000 
000u3 
00007 
0000) 


o00u0 
46000 
46000 
Oo0167 
00155 
00003 


PROGRAM MACOPTH 74/74 OP Tm FTN 4.76485 01/09/79 12.55.45 PAGE 1 
1 PROGRAM MACOPTH(OUTPUT) 
COMMON ANSWER(25) 
PRINT loo 
100 FORMAT (IH) 
5 CALL BEGIN 
PRINT 20+ (ANSWER(I) a1 924) 
20 FORMAT (4024) 
END 
17214000000000000000 17216000000000000000 17214000000000000000 17216000000000000000 
17176000000000000009 60556777777777777777 17176000000000000000 GOST3TTIVITIVIVITTITT 
17247400009000000000 17235400000000007500 17247400000000000000 17235400000000000000 
17177000000000000000. 60547377777797777777 17177000000000000000 GOSTITTITITIVIGITTTT 
17265500000000000000 17244600000000000000 17265500000000000000 17244600000000000000 
17177252525252525252 GOSS 73777777 772777777. 1717725e525252525252 GOST3I777777077779797777 
2 Xe) 
i ' - - 
he 
bh 
MFS NUl= CY874-5N108 5C/ROB 11/14/76 
12.55.44.00N00GF FROM ’ 40H 
12+55.44.1P 00000320 WORDS = FILE INPUT » DC 04 
‘ 12.55.44.D0NsTS. 0014968831896 sMILLER 
12655045 .FINeR=06 
12.55.51. 1 WARNING MESSAGE IN MACRO 
12.55.51. e687 CP SECONDS COMPILATION TIME 
12.55.51. MAP»PART, 
12.55.52.L60, 
12.56.24, END MACDPTH 
12.56.24, e077 CP SECONDS EXECUTION TIME 


12.56+24,0P 00001920 WORDS = FILE OUTPUT » oc 40 


12.56.25.MS 3564 woRDS ¢ 14336 MAX USED) . 
12.56.25.CPA. e967 SEC. e987 ADJ. 

12.56.25.CPH 0192 SEC, 0192 ADU. 

12.56.25.10 1.166 SEC. 1.166 ADJ. 

12.56.25.CM 42.524 KWS, 20595 ADJ. 

12.56.25.S8§ 4.94) 

12.56.25.PP 8.34u SEC, DATE 01/09/79 

$2.56.25.EJ END OF JOHe OH 


MACRO 


i 
i 


cT-6 


TUTTTATITT TTT TTT TTT 


5110000032 « 
5120000033 ¢ 

2 5130000034 ¢«- 

5140000035 ¢ 


3 40612 
30712 


5160000000 C 
4 $170000001 C 


24606 
24707 


S$ 5160000002 Cc 
5170000003 C 


6 44634 
31734 


5160000004 C 


COMPASS 326-476, 01/09/79 12.55.50. PAGE 
IDENT MACHO 
ENTRY BEGIN 
LIST Me-HeR 
STORE MACRO PSeP6 
SA6 PS 
SAT P6 
ENDM 
SAM MACHO PARH1 »PARM2ePARM39PARM4 » PARMS o PARM6 o PARNT ePARMB oe PARH9 oP 
9ARM10ePARMI) sPARMI2 
LOAD PARML sPARM2sPARM39PARM4 
FX6 x1¢x2 
FXT X1L6K2 
STORE PARMSePARM6 
NX6 X6 .- 
NX7 x7 
STORE PARMT»sPARMS 
FX6 X3/K4 
FX7 X3-X4 
STORE PARMYePARMIO 
NX6 x6 
NX? x7 
STORE PARMLLePARMI2 
ENDM 
LOAD MACRO PlheP2eP3eP4 
SA} Pi 
SA2 P2 
SA3 P3 
SA4 P4 
ENOM ~ 
BEGIN DATA -0 ; 
SAM MoM¢) oMe2oMe3eANSeANS¢l sANSO2Z,ANSO3eANSO4 ce ANSOScANSOG0A 
oNSe7 
LOAD MoM*heMt2,He3 SAH 
SAl M LOAD 
Sa2 Mel Loao 
Sa3 He2 LoaD 
SA4 “Me3 ‘LOAD 
ENDM LOAD 
FX6 K19x2 SAM 
FXT X16xX2 SAM 
STORE ANS»ANSel SAM 
SA6 ANS STURE 
SAT ANS*} STORE 
ENDM . STORE 
NX6 X6 SAM 
NXT XT SAM 
STORE ANS*2s9ANS¢3 SAM 
SAG ANSe2 STORE 
SAT ANS¢3 STORE , 
ENDM STORE 
FX6 X3/X4 SAM 
FXT X3-X4 SAM 
STORE ANS*4eANS¢S | SAM 
SA6 ANS¢4 STORE 


MACRO COMPASS 346-476. 01709/79 12.55.50. PAGE 2 
7 $170000005 C : SAT ANS¢5. : STORE 2 
ENOM STORE 2 
24606 NAG x6 SAM ol 
_ 2aror NX? XT SAM ef 
10 STORE ANS*6eANS¢? SAM S| 
10 5160000006 Cc SA6 ANS#6 STURE 2 
5170000007 C SAT ANS*¢7 STORE 2 
ENDM STURE 2 
ENDM a SAM ol 
lh , SAM H+4eM*5oMo6ot>TeANS*+Be ANS*9eANS*1OANS¢ED CANSOR29ANSOL3 
ooANS*RAsANSO15 ; 
11 LOAD = Meo MS oMoGome? SAM of 
11 = §110000036 » SAI Moe : : Loap o2 
§120000037 « SaA2 + MoS Loap 02 
12 $130000040 « $A3 M96 LuAD o2 
5140000041 « SA4 Me? Loao 02 
ENDM : ; ; LoaAp 02 
13° 40612 FX6 x1ex2 ; SAM Pe | 
30712 FXT X1¢x2 SAM ol 
STORE © ANS+48sANS49 SAM ol 
5160000010 ¢ SAG ANS+8 STORE 2 
14 5170000011 C SAT ANS +9 STURE 62 A ss 
ENDM : wes STORE 2 ; : 
24606 NX6 x6 ; SAM el 
Ve) 24707 NXT xT : SAM el 
i 15 . STORE ANS*10eANS$} SAM el 
ee 1S §160000012 c SAb ANS#10 STOHE = 2 
5170000013 ¢ SAT ANS#1} STORE 62 
; ENDM ; STORE 2 
16 44634 FX6 K3/X4 ’ ; SAM ol 
31734 : FXT X3-X4 SAM of 
STORE ANS#12eANS¢)3 SAM ol : i 
5160000014 C SAb ANS¢12 STORE 62 
1?) 5170000015 c - SAT ANS¢13 STORE 2 
ENUM STORE 62 
24606 NX6 X6. SAM ol 
24707 NXT ° OKT SAM ol 
20 STORE ANS*14.ANS¢35 | SAM el 
20 5160000016 C . SA6 ANS¢D4 STORE. 62 
5170000017 C SAT ANS*15 STURE .2 
ENUM STORE e@d 
ENDM ; SAM ot : 
LIST =m 
21 52810000042 « . SAM H*G9H*90H+109M0) 2 eANS*160ANS0179ANS¢1B0ANSO199ANS¢209AN 
9S¢21,ANS+22+ANS¢23 : 
31 0400000000 » EQ BEGIN 
32 17204000000000000000 M DATA — 1.40.92 609300 94500500065007 000 Bo 0oFe Ooh OeOodhle0el2e0 
USE 4/ 
0 30 ANS ~~ BSS 24 
USE 0 
46 END 
476008 CM STORAGE USED 121i STATEMENTS | 3 SYMBOLS 


MODEL 73 ASSEMBLY 0.454 SECONDS O REFERENCES 


vI-6 


MACRU COMPASS 3.6-476. 01/09/79 12.55.50. PAGE 
ERROR OFRECTORY. 
3 TYPE ERKOR DUPLICATE MACRO DEFINITION. NEW ONE OVERRIDES. 
OCCURRED ON PAGES i . 

LOAD MAP - MACOPTH CYBER LOADER 1.4-485 01/09/79 32.56.22. PAGE 

Fwa OF THE LoaD hail 

LWAel OF THE LoaD 7133 

TRANSFER ADORESS == MACOPTH 2173 

PROGRAM ENTRY POINTS oo MACDPTH 2173 

PROGRAM AND SLOCK ASSIGNMENTS. 

BLOCK ADORESS LENGTH FILE OATE . PROCSSR VER LEVEL HAROWARE COMMENTS 

MACDPTH tik ‘2105 iGo 01/09/79 FIN 4.7 485 666K I PROGRAM OPT=} 

MACRO 2216 a :) L6o 01/09/79 COMPASS 3.6. 476 

/STP LENDS 2264 1 

7FCL CS 2265 26 

7U8.10.7 2313 101 

Q2NTRY3 2414 0 SL-FORTRAN 11/16/76 COMPASS 3.6 485 FCL INITIALIZATION ROUTINE. 

/FCLEENT/ 2414 40 . 

CUMIO= 2454 33 SL~FORTRAN 11716778 COMPASS 3.6 485 COMMON CODED 170 ROUTINES ANO CONSTANTS, 

FCLEFOL 2507 40 SL-FORTRAN 11/16/78 COMPASS 3.6 485 FCL CAPSULE LOADING 

FELFST= 2547 3 SL-FORTRAN 11/16/78 COMPASS 3.6 445 CONVERTED DATA STORAGE 

FLTOUT= 2552 311 SL=FORTRAN 11/16/78 COMPASS 3.6 485 COMMON FLOATING OUTPUT CODE 

FOKSYS= 3063 301 SL-FORTRAN 11/16/78 COMPASS 3.6 465 FORTRAN OHJECT LIBRARY UTILITIES, 
* suTCoMs 3364 154 SL-FORTRAN 11716778 COMPASS 3.6 485 - COMMON OUTPUT CODE 

YSAIDs 3540 1 SL-FORTRAN 11/16/7786 COMPASS 3.6 485 LINK BETWEEN SYS=alD AND INITIALIZATION CODE. 

TECMSK= 3541 42 SL-FORTRAN 12/16778 COMPASS 3.6 445 INITIALIZE CONSTANTS, 

FMPAP= 3602 357 SL-FORTRAN 11/16/78 COMPASS 3.6 485 CRACK APLIST AND FORMAT FOR KODER/KRAKER. 

FORUTL= 4161 46 SL-FORTRAN 11/16/78 CUMPASS 3.6 445 FCL MISC. UTILITIES. 

GETF ITs 4227 57 SL-FORTRAN 11/16/78 CUMPASS 3.6 485 LOCATE AN FIT GIVEN A FILE NAME. 

KOVER= 4306 451 SL-FORTRAN 21/16/78 COMPASS 3.6 485 OUTPUT FORMAT INTERPRETER, 

OuTc= 4757 150 SL-FORTRAN 13/16/78 COMPASS 3.6 485 ' FORMATTED WRITE FORTRAN RECORD. 

/FDL.COM/ 5127 it} 

FOL.RES 5143 211 SL-SYSLI@ = = 11702/78 COMPASS 3.6 485 FAST DYNAMIC LOADER RESIDENT, 

FOL.MMI 5354 222 SL-SYSLIB = =11702/78 COMPASS 3.6 485 FOL MEMORY MANAGER INTERFACE, 

CPU.SYS 5576 40 SL-SYSLI8 11735/78 COMPASS 3.6 676 PROCESS SYSTEM REQUEST. 

CMF CALF 5636 160 SL=SYSLIB =-12715/78 COMPASS 3.6 485 CHM Viel = ALLOCATE FIXED. 

CHF ..CSF 6016 6 SL~SYSLIB =. 11/15/78 COMPASS 3.6 465 CMM Viel = CHANGE SPECS FIXED. 

CHM.FFA 6026 14 SL-SYSLIB = 11/15/78 COMPASS 3.6 485 CMM Viel = FIXED FREE ALGORITHM, 

CHF LFRF 6040 36 SL~SYSLIB =—-11/15/78 COMPASS 3.6 485 CMM Viel ~ FREE FIXED. 

CHM.R 6076 214 SL“SYSLIB = 11715778 COMPASS 3.6 485 CMM Viel = RESIDENT SUBROUTINES, 

CMF.SLF 6312 22 SL-SYSLIB =-11/15/78 COMPASS 3.6 485. CHM Viel = SHRINK AT LWA FIXED. 

CTLSRM 6334 433 SL-SYSLIB = 11716778 COMPASS 326 485 CHM CONTROLLING ROUTINE, 

ERRSRM 6167 25 SL=-SYSLIU 11/16/78 COMPASS 3.6 485 CRM ERROR PROCESSOR ENTRY< 

LISTSRM TO14 67 SL-SYSLIB 31/16/78 COMPASS 306 485 CRH = ALLOCATE SPACE FOR LIST OF FILES 

4/ 7103 30 

: ! 
e333 CP SECONDS 235008 CH STORAGE USED 12 TAALE MOVES 


aa : | 
Sou = = ° : | 


MACROE ' COMPASS 346-4760 01/08/79 10.27.31. PAGE i 


_ fOENT MACROE 
ENTRY ADU 
LIST Me-BeeR 
3 MOVE. MACROE LENGTH» FROMsTO 
LOCAL MOVE] 
Stil 0 
SH2 LENGTH 
MOVE! SAS FROM¢D) 


BX6 aS 
SA6 TOeBI 
Sal Ble} 
NE B1lsH2sMOVER 
ENUM 
0 20 ANSWER BSSZ 16 
20 00000000000000000001 OPERAND DATA  192039405060708 
30 5110000020 « Aob SAl OPEKANU+O 
5l20000021 ¢ Sh2 OPERANDS) 
31 5130000022 + SAI OPERAND+2 
$140000023 ¢ SA4 OPERAND?3 
32 36612 1X6 Xbexe 
36734 1x7 XBOX4 
5160000000 4 SA6 ANSWER¢0 | STORE RESULT 
33 5170000001 + SAT ANSWERe] STORE RESULT 
5110000024 » SA] OPERAND +4 
34 5120000025 + _ Sh2 OPEHAND#5 
- 5130000026 + SA3 OPENAND¢6 
aa 35 Sl4000002T « SA4 OPEKAND 47 
ui 36612 1X6 Xbexe 
36734 Ix? X9OXS 
36 5160000002 « SAG ANSWER62 
5170000003 « SAT ANSWERS3 
37 MOVE LENGTH=LBLOCK2sFROM@SUBT» TORADD 
37 6110000000 SUL oO 
6120000011 Su2 LBLOCK2 
40 5151000044 + *7000001 SAS SUUT oH) 
10655 BXo x5 
41 5161000030 ¢ SA6 ApU+eB) 
6111000003 Sul Hhel 
42 0512000040 ¢ NE H1leB2s*7000001 
; ENUM 
43 0400000030 ¢ ENOIBLK Eu Avu 
46 5110000020 « supTt SAl OPENAND+0 
5120000021 ¢ SA2 OPERAND?} 
45 5130000022 « $A3 OPEKANDe2 
5140000023 ¢ SA4 OPERAND+3 
46 37621 : 1X6 X2-xk 
37734 Ia7 X3-X4 
5160000004 « _ SA6 ANSWER+4 STORE RESULT 
47 5170000005 »« SAT ANSWERSS ‘STORE RESULT” 
MOVE = FROM=HULT » TOAADD s LENG TH=LBLOCK3 
6110000000 Sul 0 
50 6120000011 Su2 -LALOCK3 
Si 5151000055 « *2000002 SAS MULToAL 
10655 BX6 KS 
' $2 §161000030 « SA6 Aopen) 
6111000001 : - SH) B1¢) 


53 0512000051 « . NE Blst2e#2000002 


HACROE COHPASS 3.6-476. OL/06/79 10.27.3526 PAGE 2 


ENDH . MOVE ol 


54 0400000030 « END2BLK Eu AvD 
55 5110000020 ¢ MULT Sal OPERANDSO 
5120000021 « SA2 OPERAND? 1 
$6 5130000022 + $a3 OPERAND+2 
; 5140000023 ¢ SA4 OPERAND+3 
5S? 42612 1X6 KLex2 
42734 1x7 X3°X4 
5160000006 « SA6 ANSWER 66 STORE RESULTS 
60 5170000007 « SAT ANSWER? STORE RESULTS 
List -« 
6110000000 HOVE = TO2ADDesLENGTH@LBLOCK4 sFROM@DIVIDE 
65 0400000030 « . ENO3BLK EQ ADD 
66 5110000020 OIVIDE SA} . OPERAND*0 
5120000021 « Sa2 OPERAND®} 
67 5130000022 » SA3 OPEHAND*2 
5140000023 « SA4 OPERAND?3 
70 «27101 PX) x1 
27202 Px2 K2 
24101 NX] x} 
24202 NX2 x2 
T= «27303 PX3 x3 
27404 PX4 x4 
24303 NX3 x3 
24404 NX4 x4 
72 «44621 FX6 X2/K1 
44743 FXT XG/K3 
5160000010 + SAb6 ANSWERCS STORE RESULTIFLOATING POINT) 
to 73 -$37000001) « SAT ANSWERC9 STORE RESULT(FLOATING POINT) 
{ 26676 UX6 X60n7 
26767 UX7 X70H6 
74 22676 LX6 X6087 
22767 Lx? 7966 
5160000012 « SA6 ANSWER*LO | STORE RESULT CINTEGER) 
75 5170000013 « SAT ANSWER*E) = «=STORE RESULTCINTEGER) 
76 716024702) ENDSBLK ENDRUN 
14 LBLOCKE Eau ENDIBLK=AD0e} 
110° LOLOCK2 «EGU END2ULK~SUBT¢) 
il LBLOCK3 EU END3HEK<MULT#) 
l2 LBLOCK4 EuU END4ULK=DIVIDEs2 
50 LBLOCKT Eau LBLOCK] *LBLOCK2+LBLOCK3+LBLOCKS 
14 MAXYLK MAX LELOCK) pLBLOCK2 oLBLOCK3eL BLOCKS 
1 MIN@BLK MIN LBLOCK) sLBLOCK2 sLBLOCK3»LBLOCKS 
100 END ADD 
475008 CM STORAGE USED 221 STATEMENTS 21 SYHBOLS 000003 INVENTED SYmuOES 
HODEL 73 ASSEMBLY. 0.331 SECONDS 0 REFERENCES 
MACROE COMPA - 
ERROR DIRECTORY. SS 3.6°476. en7eeris 10.27.31. PAGE 3 
3 TYPE ERROR DUPLICATE MACRO DEFINITION. NEW ONE OVERRIDES. 
OCCURRED ON PAGES ] : 


\o 
| 


= 
~ 


LOAD MAP = MACROE 


FWA OF THE LOAD 


twAel OF THE LOAD 


TRANSFER ADORESS == ADO 


PROGRAM ENTRY POINTS <= 


wa 
251 


ent! 
MACROE 


PROGRAM AND BLOCK ASSIGNMENTS» 


BLOCK 


MACROE 
CPU.SYS 


0090 CP SECONDS 


OUMP RELATIVE 


oothl 
oonls 
GOl2u 
00324 
00333 
00134 
00140 
00144 
00159 
00154 
00160 
00164 
00170 
oo174 


00000 
00000 
00000 
00000 
00000 
00000 
00000 
27303 
51700 
04000 
$1700 
05120 
42612 
51610 


ADDRESS 


00000 
00000 
00000 
00000 
00000 
00000 
00000 
27404 
00124 
0014) 
00116 
00162 
42734 
0014) 


11 
2ul 


00000 
00000 
00000 
00000 
00000 
00000 
00000 
24303 
61000 
61000 
61100 
61000 
52600 
61110 


LENGTH FILE 


100. L6o 
40 SL*SYSLIB 11/15/78 COMPASS 3.6 476 


00003 
00017 
00014 
ov001 
00003 
00004 
00010 
24404 
46000 
46000 
00000 
46000 
00117 
20001 


DATE 


241 


CYBER LOADER 1.4-485 


PROCSSR VER LEVEL HAROWARE 


135008 CM STORAGE USED 


OMPUMD20177) 


00000 
00000 
leks 
o00u0 


00000 
S1ivo 
44621 
71602 
51100 
61200 
04000 
51700 
05120 


00000 
00000 
00000 
00000 


00000 
0013) 
44743 
47021 
00131 
oo0t! 
00141 
ool2u 
00173 


00000 
00000 
00900 
00000 


ooouNu 
51200 
51600 
20650 
$1200 
61000 
61000 
61100 
61000 


00007 


00001 
00000 
00000 


0v005 
00132 
oole) 
46000 
00132 
46000 
40000 
00000 
46000 


01/08/79 COMPASS 3.6 476 


00000 
TrITT7 
17205 
00132_00000 


00000 
51300 
51700 
03000 
51300 
51510 
51100 
61200 
04000 


00000 
17777 
25252 
00000 


00000 
00133 
00122 
ovel3 
00133 
00166 
00131 
oovl2 
00141 


01/08/79 10227233. 


COMMENTS 


PROCESS SYSTEM REQUEST. 


1 TABLE MOVE 


00000 
77777 
52525 
00000 


00000 
51400 
25676 
61900 
51490 
$0655 
51200 
61000 


61000. 


00013 
717776 
25252 
0000) 


00006 
00134 
26767 
46000 
00134 
46000 
0132 
46000 
46000 


00000 
00000 
00000 


00000 
27101 
22676 
05120 
37621 
51610 
51300 
51510 
51100 


PAGE 


00000 
00000 
00000 


00000 
27202 
22767 
oolst 
37734 
00142 
00133 
ool7? 
00131 


00000 
00000 
00000 


00000 
2610) 
51000 
61000 
51600 
ollie 
51400 
10655 
51200, 


00002 
00002 
00002 


00007 
eseve 
00123 
40000 
00115 
oo0ol 
00135 
46000 
00132 


MFS NHl= CY874=-SN108 5C/R08 11/14/78 
10027e25.00UN00K9 FROM 70H 

10027.25.1P 00000668 wOROS = FILE INPUT ¢ DC 06 
10027.25.D0NeTS. 0014968830 1896eMILLER 
10.27.230.COMPASS. 

10.27.32. 1 WARNING MESSAGE IN MACROE 
10027.32. ASSEMBLY COMPLETE. 475008 CM USED. 


10.27.32. 00476 CPU SECONDS ASSEMBLY TIME. 
30227232.L60., 


10.27.33.04P (1119177) 

10.27.33.EX1T. 
10627233.0P 00001408 wORDS = FILE OUTPUT » Dc 40 
10027.33.4S 3584 WORDS ( 7168 MAX USED) 


10627233.CPA 0587 SEC. e587 ADJ. 
10.27.33.CPy 0104 SEC. "0104 ADU. 
20.27.34.10 “ e328 SEC. e328 ADJ. 
10.27.34.CM ' 18.316 KwS. e117 ADU. 
10.27.346.SS 20138 

20227.34.PP . 30913 SEC. OATE 01708/79 


20627034.ES END OF JOB8e On 


MACROS 
OPDEFS 


COMPASS Manual, Section 5 


OPDEF'S 

MACROS are sequences of code identified by a name: that is, whenever the name 
is used, the assembler brings in the associated code. 

We can also associate a specific instruction Syntax with a sequence of code. 
Whenever an instruction matches the Syntax in the definition, the assembler 


will bring in the associated code. 


For example, the instruction: 


: _ DX6 X5/x4 
Delimiter 
follows the form: t 
IXxX 
Opera tign a 
Code Registers 


There is no single hardware operation to perform this function (integer 
division). To handle this we set up a sequence of code called an OPDEF, 
which is similar to a MACRO. 


MACROS 
-OPDEF Syntax 


The Syntax of OPDEF's must follow certain conventions. The Syntax can include 
both registers (A, B, X) and expressions (Q) as in the following example. 


' This OPDEF is designed to extract a certain set of bits from one X register 
and put them in another specified X register. 


Syntax Parameters 


OPDEF Definition 


Syntax: 


E = Operation Code 
Exx,Q,Q OPDEF R1,R2, FIRST, LAST 


X =X register MX.RL 4 60-LAST-1 
BX.R1 -X.R1L*X. R2 
Q = Expression AX.RL FIRST 
Variables: ENDM 


RL = Result Register 
R2 = Operand Register P 
FIRST = beginning of bit stream (lower) 5 


LAST = end of bit stream (upper) 


OPDEF Call ; EX2 x1,,30,40 


Extract bits 30 to 40 
of Xl and put them in 


in X2 
MX.2 60-40-1 EX2 ol 
Since the Syntax of the instruction BX.2 “X.2*X.1 EX2 el 
above matched the Syntax of the ' AX.2 30 EX2 el 
definition, the assembler generated ENDM EX2 ah 


these three lines of code inserting 
the given values (2, 1, 30, 40) for 
the dummy variables. 


OFDEF.- 


“A TYPE OF MACRO 


“DEFINES A NEW INSTRUCTION or 
REDEFINES AN EXISTING INSTRUCTION 


i.@.. 


INTEGER DIVIDE 


The Call: 


. ACTUAL REGISTER PARAMETERS 
| i | a) K 
1X6 X1/Xz2 


The Macro Definition: 


: 


FORMAL REGISTER PARAMETERS 


i j k 
IXX/X  OPDEF = P|. p2* pa” 
(No 
IX aan a | CODE TO PERFORM 
_ INSTRUCT ' INTEGER DIVIDE 
ENDM 
X45 /Xk 
ADDRESS FIELD 


co~6 


OPner COMPASS 3.5-470, 06/27/78 16.38.13. PAGE 2 


IDENT oPner 
ENTRY INEIDEVD 


List 
® 
e . 
tS) OPNEF FRAMPLE - INTEGER DIVIDE | 
PMH OPDEF PARMEcPARM2,PARN) 


PR,PARM? x», PARND 
NA. PARM? KLPARM2 BK 
PX,PARM) X.PARM) 

NX, PARK NLPARHIL8S 
RAXLPARME N.PARM2/N  PARMY 
UN.PARM) X.PARM)D 06 

LA. PARM) X.PARMI.BA 


ENNM 
a 
0 46000 INTOIVO NO 
Stieeoool!s « Sal NUMBERS 
# Si20000012 - Sa2 NUMBERS 0} 
1x6 nisx2 
27101 PRD Ke 1n6 of 
2414) NX.D Keefe x6 ol 
2 207203 PK.2 Ke2 16 ‘ol 
24282 WK.2 R2085 axe of 
45612 AKG MM/N2 1n6- ot 
26666 UN.G R.6086 x6 el 
3 22666 UX.6 X.60R6 1x6 ot 
NOM 1x6 ol 
$160000000 C Sas our 
& $13000001) + SA) NUMBERS 02 
51500000184 « $as NUMBERS «3 
+} wn? KISKS 
S$ 27309 PRI NLS mn? of ; 
24943 NK. RO V0B4 pei | 
27505 POX.S KOS x? of 
24555 . NALS K.508S ny me | 
6 45735 ART MOINS 1x7 el ; 
26767 UNL? KTPON6 IA7 of 
2276? UKLT Ree ; Ix? ot 
ENON ax? of 
yY Siveeceeet c Sa? ourel 
71602467021 ENDRUN 
ft €00000¢0000000000010— NUMBERS OATA Ae2e-Se) 
' USE 7ANSWERSS 
C] 2 out 6552 2 
1s €ND INTOIVD 
473008 SCM STORAGE USED 49 STATEMENTS & SYMBOLS 
MONEL 374 ASSEMALY 0.049 SECONDS hh REFERENCES 
OoPnrF COMPASS 4.5-470, Onsets 1b 06. dRLED. PACE q 
€PHOR NRE TORY, 
V TVPE FRROW NUPLICATE MACRO OFF INITION, NEW ONE AVERRINES, 


GCCCUHRED ON PAGES 


> : 


i 
' 
Loap Map - oPoer CYAEN LOANER 1.4-670 06727798 16.30.15. PAGE ' 
twa OF THE LOAD abi 
Lwacl. of THF Loan 170 
TRANSFER ANDRESS -- INTDIVO ia B 
PROGRAM ENTAY POINTS -- opner 113 
PROGRAM AND ALOCK ASSIGNMENTS. ‘ 
BLOCK ADOHESS LENGTH FILE ‘pate PHOCSSR VER LEVEL HARDWARE COMMENTS 
iene 1D 15 ico O6/729/TA CUHPASS 3.5 £70 
5V¥S.AN 10 40 SL-SYSLIB 05/16/7TH COMPASS 3.5 470 PROCESS SYSTEM REQUEST. 
2023 CP SECONDS 13200H cM St onact USED 1 TABLE MOVE 
io 
t 
i) 
“ ouve HELATIVE DMO CEEDOETPD 
00118 990000 00000 v00no onnns Tete TIPE VIITE FIT 46000 51100 oO126 44000 
oonns 51200 00125 27Int 26141 27202 26752 BSE12 24aKKH 27666 SIHND 0011) 46000 51300 0126 $1500 oo12? 
OO120 =—.27303 24383 2ISNS 24555 45TIS 24767 22161 46000 . = § 700 ON1N2 TEN2 s7O2d 20650 01000 00132 «4000 
00926 0000 00000 v0000 09010 00600 OnH00 nvHOV oNNnn2 VOVTT VIITT FIIVT VIS 00000 00000 on000 00003 
00130 04000 00143 On0nn 00000 08390 09900 nOn00 OONnN 04000 n0124 nne00 On000 $1100 0000) 03110 0on133 
00134 S461 04000 00111 46000 51100 00006 03910 OO1W? | 51800 00230 04000 00140 TH100 00830 20160 46000 
oolso 3460 DINAL 89401 446000 51490 onldt 10481 sA000 St100 00001 ot000 00130 20652 01000 00132 46000 
00144 SEI00 COO! OITIN OO446 04004 001465 Alnno 44000 S1100 on008 03210 00145 71602 20916 04000 onte3 
00150 20550 IAaAd O1000 00432 06004 001518 41000 4000 P1602 20318 20652 34662 53160 20873 03380 90151 
00156 01080 00151 Siton O00) O31tN HFS) YI100 oONN! 04900 00150 41000 44000 71603 246616 12668 20651 
00160 01000 0919192 Gtono sAnon 040046 ONIHl AlnOO 4646000 73660 20610 82948 79610 20923 03710 00157 20°51 
ontas DUEER 20416 SIPHON OOFAT THAD IAIIA 22) GANDO 04000 O15? 61000 46000 00000 0f000 on000 on0v0 


Ool?to | 4n000 90099 Q40n% 00470 OO}77>40000 Onnad n4aNHs OOLT? 


COMPASS 1.5-470, Onsets7h 1bL01.0d. PAGE ’ 


oPnrr 
STORAGE AGL OCcet ian, 
ADDRESS LENGTH AINARY CONTHOL CARNS. 
0 15 1DENE afort 
is END mIpivo 
ALACKS HVPE ADONRESS LENGTH 
PROGRAM® LOCAL 0 , is 
ANSWERS  CONNUN ry ? 


ENTRY POINTS. 


INTOIVO ne 


FRATERNAL SVHAOLS. 


SYSe 

wo 
{,  opoer COMPASS 365-4706 06/27/78 16.31.23. PAGE 4 
rs SyMAOLIC SFFFRENCE TAPLE. 

InNTOIVO 0 PROGRAMME 2702 € ese 

NUMAERS ut Ppeagrane 27a 2734 2/730 : efit 27O3 1 

out 0 ANSWERS 2729 4% 2761 4 P4458 L 

S1Se 0 Cure anare ase) : 


“rr NA2- CYRIIS-SNI 4UHT/R6R OS/157TR 
16.33.22. .MONDONY FROM 75H 
PH.DBDT.IE «00000256 WOHDS - FILE INPUT 56 NC 1% 
§6.33.21.00N, PSH oO2 Ae P2CTORRACHILILER 
16.313.02.F04P ASS, 
14.38.53. .U WARNING MESSAGE 3N OPNEF 
16.30.94, ASSEMALY COMPLETE. £73008 SCH USED. 
6.38.04. 0.802 CPU SECONDS ASSFMALY TIME, 
$6.38.948.060. 
POL DLL US. OMPCDDD SITS 
16.38.35.9P O00080AR WONNS - FIRE OUTPUT « OC 40— 


16.32,15.45 3SA& WORDS 1 10752 Max USED) 
16.33.15.CPA ebK2 SEC. o1S2 ans, 

16.38.95.10 0695 SFC. 2415 ADJ. 

16.31.35.C% 20.5A} MWS. 2665 Alt. 

16.39.35.55 §.4)) 

16.30 .85.PP 3.832 SEC. © DATE O6/277I8N 


16.30-35.F 2 END OF JOBe SH 


MICRO 
* USE A SYMBO 


L NAME 
° TO GET A STRING OF CHARACTERS 


i.e. 
STORE 
The Call: ae 
TO 
| CONSTANT 
STORE En 
GENERATES THE CODE: 
A7 ANS+n 
The Micro Definition: x cuars (yor necessary) 
cc a START | 
TO WITH DELIMITERS 
CHAR 1 


TORE MICRO ™ * #SA7 ANS 3" 
S E RO | 

SYMBOL CHARACTER STRING 
NAME 


HyCcHO 


COHPASS 3,5-478, OB/2T/IBR BAB eT PAGE 


IOENG HECRO 
SOO CHOOCHHSE THESES EECOESOEEESSELOESESESESETHESSHH HOODEO HH OOOEOHOEHHNCOOONE8EOHROSO 


° THE CHARACTER STRING OF THE MICRO §S INSERTED WHERE 89 9S CALLED ° 
e AV THE sHNNNNNMNNNNGe, «(OTHE LEST ALESIS THE MICRO ERPANSION ® 
a e 
COMO OPHRRODSSHSHTEHSESOHETSADHASEOOHESEHOESOEGESHEOVOOEEHREOOR OE DOOEOHECEDOOOEED 
i EnNtAy staat 
List Aceh 
’ toap HEICAD tee2SAl Alene 
STONE WICHO JYor*SaP ANSWERC® 
© 6220000008 START $6) t 
ei2zecceoer $82 2 
$2 Oara ty 2040506 
Q Spbecoeeiz « SAt DATA 
torat Bx? ut 
OSTORE #0 
2 Sireceecos o SA? ANSWER CO 
8 
a PLOADS? 
Saint Sal ales) 
e 
Vo7tt BX? al 
OSTORE DS) 
Vel 3 Sivecoeear « Say ANSVER OG 
! ° 
nN 
2) sLOADe2 
34i02 SAl al+s2 
e 
toras dnt aa 
PSTORE SZ 
& Siveooeeie « Sar ANSWERS? 
e 
Viea2stars ¢nornun 
6 4 ANSWER oss? 4 
OETAULT SVHBOLS DEFINED BY CoHPASS, 
oa a3V9e . 


CONTENT OF LITERALS ALOCK, 


£2 00000000080000008002 a 
43 00000900000000000004 o 
14 €0000000000000000005 £ 
15 00000000000000000006 c 
6 €No Start 


AT WNAR Sem qTARAaE sen 41 STATEHENTS A SYMROLS 


Lo-6 


DUMP 


|__| ae a 


10An MAP = wWICHY Creede LOAM P.4-470 vas2nsin bh. dd. 2A VALE ‘ 
twa OF THe GOAD go) 
gwaAe} OF THE LOAD a? aie 
iMANSFEA ADNRESS -- STARE nt 
PROGAAM CNTY POINTS -- nichoO Wy 
PROGRAN OND ALOCHK ASSETGNMENTS, 
AL OCR ADDNESS LENGTH rice Oatt ~~ PROCSSA VFA LEVEL = bHAANWARE COMMENTS 
wicno uns 16 tao OA/Z2777H COMPASS 1.6 GIN 
$V¥5.RM ar 60 SU-SVSLED osstasr CUMPASS 1.5 470 PROCESS SYSTEM REQUEST. 
2023 €P SECONDS — 13200 CH Stnwact USED t tasc€ ove 
ATLATIVE NMP ELidel2r 
ooo) 63100 00008 61700 00n02 Stbo0 on82) 10711 44n00 59700 OO1R? S4IE8 Borel 
ones Stton On120 S4dd? forth Sttoo oolet Flan? e207) 20650 03000 n0133 44000 000NO 00000 00000 on002 
nnt2o 00000 Onnnn unnnA oOnns gnano 0N0N0 nONnV 90N6 00000 00000 00000 00000 00000 6n000 o0000 nno002 
ones 00090 ONANN CoOnnn OONnDs 00000 0n000 ofnne 00005 0H000 00000 00ND 00006 04090 00142 onnnod 00000 
“re NH2- Cv TS-SNI aLHisnon 0571577A 
$4.30.25.N0NNOH? FROM 75H 
16.3b.25.9P 000025 wotns - FILE INPUT 6 OC 04 
16.3).25.D0N. PSN OZPOcPACTOPLACHILLEN : : 
16.32.27. COMPASS. 


b6.3be27. ASSEHNLY COMPLETE. 47300Ah SCH USED. 


lo.3).27. 


$6.31. 770 G0. 


0.09% CPU SECONDS ASSFHULY TINE. 


Moo Z2H.OHP UTED DZD 


$6.33.78.0P 
16.300.28.65S 
TA. DD. 2A.CPA 
$a.3t.28.10 
bes vd. 2h. 
$6.3b-2A.SS 
16.91. 2A.PP 


0000009, WORDS - FILE OUTPUT « OC 4&6 


31§A& WORDS ¢t 10752 MAK USED) 


0446 SEC. oh46 ADS. 

ofh32 SEC. : of b2 ADS. 

10.516 MWS. e468 ADS. 
1.421 

3.074 SEC. DATE 00727776 


1h.22.28.F) ENO OF 30Me Sit 


CONVENE ; COMPASS 3.9-470, OA7PT/7A 08,490.57, PAGE 2 


fOrnt = conveaRt 
COS O OE ROHSEH SOSH HSE HESS EAEHEEEHHERASHAHULHTHHFOSESHCEETESHEEHEDHOOEVETE OER OOOEEEO 


ba ry 
e #ECRO AND DUP PSEUND OPERATIONS . ° 
e * e 
e CREATE A FRUERNAL ACD TO NEISPLAY CODE CONVERSION TABLE , ba 
° e 
SOSSHSHESHSHHAHSCETSHHOHREHOTSSHOHAHHEHHORHE HEHEHE HHOCESESHHEDOC ER EEHHOOHEHECHEEEE 
cist 06 : 
0 TARLE ass 
o-D cone OUSPLAY CODE 
’ o sev ’ 
35 Our 375A 
Char HICRO OHoheStlZISSETAVOHSUL /STUVUNVZ DUS 
J < DATA WAsCHANs 
0 SEY nel ‘ 
Foo 
@ €00800080000000000000 Dara qe epuPpe ot 
1 000000000000000000 3% DATA Ad ; epupe of 
2 00000000000000000015 OAatA WAZ ; enupe of 
3} 000000000000000000 36 pata pay . eoupe el 
& 000000000000000000)? DATA = {AG epurpe at 
S$ 00000000000000000040 DATA {RS epupe et 
6 6000000000000000004) Oata me epupe ot 
P + 00000900000000000042 DATA yay epupe ot 
10 0000000000000000004%) OATA ia epure .h 
th = 000009000000000000044 OATA pag eoupe | 
r $2 000000000000000000)3 DATA ino epure oh 
NY 13 00000000000000000054 Mata pn epupe ol 
x foe) te O00d00000000000000T4 : OATA ine epuPpe eo! 
15 0000000000000000006) DATA ae epupe el 
16 00000000000000000061 DATA pay : epupe of 
, 1? 00000000000000000055 OAatTA ya souPpe ol 
20 00000000000000000050 Oara yas 2 eoupe el 
21 =0000000000000000002) : Mata RS epupe of 
22 00000000000000000024 DATA gar epupe eo} 
23) 00000000000000000025 Mata tau enuPpe ed 
24 00000000000000000026 Data quay ‘epupe of 
25 00000000000000000027 OATA yaw #pupe Ps | 
26 00000000000000000030 OATA yan : epuPpe od 
27 000000000000Nn0000032 Oata thy *pUuPe of 
30 00000000000000000032 Oata par epupe o) 
38 =OgHd00D0000000N00NCA2 DATA We epuPpe ot 
32 +00000000000000000056 DATA tne. epuPpe ot 
3} =OoC00000000000000051 Oata pat epupes of 
34 =00000000000000000055 . Data qa epuee of . 
3S 00000000000000000065 DATA 45a DO¢SPc_avy CNDE FOR « 
t Oo ser 1 : 
42 oue 42a 
Cuan MICAQ Nel e7EA-IMLMNOPORVESe4> CAANCOEFOHES 02 87 
ara 1AsCHARe : 
1 srt ne} 
fron 
36 «©=600000000000000000060 Data pas enuPpe of 
VE -0000994F0Q0000ND000HT Mata pha . : eoure of 
40 00000000000000000046 Oata pa- enupe of 
£h OHOGOHONDOHANNHAOOL? Dara py : ; enupe ot 


67-6 


CONVERT 


i 


00000000000000000083 
0000000000000000001IF 
00000000000000000015 
O00000NDD00000NDDNDIE 
COND0000DVNDRDDND0DDI? 
00000000000000000020 
O000OHNDD0000NDD0ND2} 
00000900000000000022 
00000000000000000066 
00000000000000000053 
00000000000000000046? 
00000n00000000000070 
00000000000000000071 
00000000000000000073 
0000000000000N0000485 
90000000000000000003 
V0000000000000000002 
00000000000000000003 
00000000000000000004 
00000000000000000005 
00000000000000000006 
00000000000000000007 
00000000000000000010 
C000000000000000001} 
Oo00000000000000CDI4 
000900000000000000057 
90900000000000000052 
00000000000000000075 
00000000000000000055 
00000000000000000077 
peo 

00-33 

33000 

i 

35 


00000000000000000033 
000000000000000000 36 
00000000000000000035 
90000000000000000036 
00000000000000000037 
C000000000000N 0000460 
0000000000000000004)} 
000009000000000000062 
- 90000000000000000043 
09900000000000000044 
01000n000000N0N000000 
0990990000000000005%6 
00000000000000000074 
00900000000000000043 
21090000000000N000008) 
90000900000600000055 


CHAR 


ss e : az 
=a ese 2S 
3 COMPASS 3245-470, 
Data 16 
DATA VNe 
DATA ACL 
DATA paw 
DATA tao 
DATA Re 
OATA HRA 
OATA pxAR 
DATA kd 
DATA 1u$ 
DATA phe 
DATA {ae 
DATA Re 
DATA {A> 
OATA 1h. 
DATA Ra 
DATA ra 
DATA =4RC 
DATA 1kO 
OATA 1kE 
DATA ia 
DATA TAG 
OATA pRe 
DATA 8 | 
OATA pA 
OATA 1A, 
DATA tA. 
DATA yR> 
DATA {rR 
DATA Ro a 
cone OTHER 
CHaR 00330 INTERCHANGE COLON AND 
CHaR 33-0 ZERO FOR CODE OTHER 
SET 1 
Oup 325A : 
MICRO = MoleS81236567H900cRE ASTUVUKVZ26(8 
OATA IReCHARS 
SET net 
Enno 
DATA Re 
DATA AA 
- DATA 1Re2 
OATA wy 
DATA pe 
_ DATA TRS 
DATA 74 
DATA wer 
DATA TRH 
DATA }HO 
DATA IRo 
DATA pR-= 
Mara ph< 
“DATA 1Re ; 
DATA WHE ‘ 
DATA ya 
DATA us 


06/27/18 09.40.57. 


PACE 


®nupe 
*nupe 
*nuPe 
*puPe 


" @pupe 


Dupe 
enupe 
*oUuPe 
®oupe 
*nupe 
*0uPe 
#pupe 
®pUP® 
enupe 
*puPe 
®pUPe 
*pupe 
enupe 
enuPe 
*ouPe 
eoupe 
*ouPpe 
*puPpe 
®puPe 
eoupe 
eouPe 
*pupe 
#oupe 
®nupe 
*pupe 


*ouPpe 
enuPpe 
*oupe 
enuPpe 
*oupe 
*ouPe 
*nupe 
*puPpe 
enupe 
enuPpe 
eniuP.e 
enupe 
enupe 
enue 
*nupe 
enipe 
eniipe 


3 


CONVERT 


122 
2) 
126 
12s 
126 
ler 
190 
13) 
132 
193 
je 


135 
136 
137 
140 
tet 
142 
14) 
pas 
1465 
146 
47 
1s0 
151 
1s2 
ih) 
1S4 
155 
156 
is? 
160 
161 
162 
163 
164 
45S 
166 
la? 
170 
7 
1te 


0€-6 


7 ‘ 


00000000000000000024 
00000000000000000025 
0n000N00000000000026 
O000NDDOODODNNNDOON2T 
000000900000000000 30 
0000090000000000003) 
00000000000000000032 
Oon0d0000000NNDNNNH2 
00000000000000000056 
000000000v000000005) 
00000000000000000055 
n-0 

1 

35 


00000000000000000000 
000000000000000000 34 
00000000000000000035 
000090000000000000 36 
0000000000000000003? 
00000900000000000040 
0000000000000000004) 
00000000000000000042 
000000N000000ND00063 
00000000000000000064 
000000000000090000)) 
00000000000000000054 
00000000000000000074 
0000009000000000000063 
CONDNNDDDD0NNNDNOOOSI 
00000000000000000055 
00000000000000000050 
0000000000000000002) 
0n000000000000000026 
00000000000000000025 
00900000000000000026 
00000000000000000027 
000000000000000000 30 
000000000000000000 31 
00900000000000000032 
00000000000000000062 
00000000000000000056 
0000000000000000005) 


00000000000000000055S 


ata 
pata 
Data 
Data 
para 
OaTa 
MATA 
DATA 
Mara 
Oara 
Nara 
CONE 
0 Set 
Que 
wECRO 
DATA 
0 sft 
fNDO 
OATA 
OAtTa 
DATA 
DATA 
OaTAa 
DATA 
OATA 
OaTa 
OAaTAa 
OATA 
DATA 
OATA 
OATA 
OatTa 
“OATA 
OATA 
Data 
Oata 
DATA 
DATA 
OATA 
OATA 
DATA 
DATA 
Oara 
DATA 
DATA 
OATA 
Mara 
END 


cCHarR 


473008 SCM STORAGE USED 
MODEL 174 ASSEMALY 


yAT 
18u 
IRy 
1Aw 
Rn 
yRy 
th? 
1A) 


WRG 
qk 
° 

t 
315A 


COMPASS 3-5-4704 


04727778 0f.60.57. 


DeleSIL2AV45S6IAVOECHEL /STUVURVZDL IS 
pRecHaRs : 


Nel 


Re 
VAI 
1882 
in» 
1R4 
1AaS 


1R6 © 


1A7 
198 
yRO 


784 STATEMENTS 
0.1356 SECONDS 


2 SYMROLS 
247 REFERENCES 


PAGE 


spupe 
“pup. 
enuPpe 
enupe 
eoure 
eoupe 
®nupe 
*pupe 
eoupe 
“pups 
enupe 


4 


seem ee ees 2S 


CONVERT COMPASS 365-470, 06/27/7786 06.40.57. PAGE 1 
STORAGE ALLOCATION. 
ADDRESS LENGTH BINARY CONTHOL CARDS. é | 
0 1720 fOFNT cONVERT 
vr2 €ND. ‘ : 
CONVERT COMPASS 3.5-470. 06727778 06.40.57. PAGE 5 
SYMBOLIC REFERENCE TARLE. ° 
o % @l2 o es )% 2/56 .  Jsle 3730" 3754 a/120 4/34 OD 
2g 27a 0 2/56 0 is 3730 O 3754 OD a/13 0 4/95 
2719 0 2795 ars? 3715 0 yi 55 4/20 4/35 0 
2720 2745 0 2/57 0 16 vio 3755 D @/20 0 4/36 
2720 0 2736 vol 3716 0 3734 O 3456 as2t 4/96 D 
272) 2736 0 3vol D air wal - 3456 O 4/21 0 ast 
272i 0 a/3t ds02 ir oO vel Oo: 63457 &/22 4/37 0 
e722 2/97 0 yvo2 0 - IA 342 3757 O 4/22 0 &/368 
2722 0 27n 3703 Ivian O W2 O “/0l 4/2) #/36 0 
272) 273a 0D 1703 D 3719 3/4) «701 O 4/23 0 47/99 
2/23 0 - @7599 3704 37319 D 3743 0 4/02 4/24 4/39 O 
2/24 e739 0 3704. D 3720 3/44 asn2 0 &/24 0 4 /a0 
2724 0D e740 3705 yv20 0 3744 DO &/03 4/25 4740 0 
2725 2740 0 3/05 O 372) 3/45 4703 O 4/25 0 47h) 
2725 0 274) /06~— 321 0 3745 OO a/ne 4/26. 4/41 0 
2/726 2eeie 3706 O 3/22 3746 #/04 0 4/26 0 ash2 
mf 2726 0 2/42 vo? 3722 O 3746 0 6/05 a/2t &/e2 0 
Ww eret 2/42 0 3707 D 3723 rsa? 4705 OB as27 0 4/43 
bh 2/27 0 27a) 3706 3723 0 wetn 4/06 472A &/43 0 
2728 2743 dD . 3708 0 3724 3/48 4/06 0 a/2n D a sae 
2728 D 2st 3709 3s24 0 3746 0 aso? 4/29 4see D0 
2729 2744 0 3709 O 3725 3749 aso? 0 4/29 D0 6745 
2/29 OD: 2745 3/10 3ves OD 3/49 0 4708 4/30 4/45 0 
2730 2765 0 3710 O 3726 3/80 #708 O 4/30 0 ase 
2/30 O 2746 yi 3726 0 3/50 O #709 asi 4/46 OD 
| a 27st 2768 D wit.o 327 51 4/09 O 4/31 0 asset 
| 2/31 O 2/et wie 3727 0 3/51 D 4/10 4/32 4/47 0 
| 232 2747 0 3120 = -9V2— 3/82 #710 0 0/32 0 4748 
2732 0 276A O TAR) 2a D0 3/82 0 ast 7/93 4748 0 
279) 2/85 713 O wee 3/5) asi O 4/3939 0 
2/33 O 2/55 0 wis 3729 OD v53 0 a/12 473s 
TABLE 0 PAOGRAMe aio 


MrF NA2- CYALTS-SNE SLO7/R6H 05715778 
068.40.54.D0N00I" FROM 4SH 
07.40.54.1P° 00000320 wOHDS - FILE INPUT +» OC 04 


07.40 .5%.00Ne PSN eO2TAe PECTOILASMILLER 
08.40.56.COMPASS, 

0A.40.58, ASSEMBLY COMPLETE, 473008 SCM USED. 
0n.40.58, 0.4618 CPU SECONDS aSSEMBLY TIME. 
08.40.59.0P 00002560 WORDS - FILE OUTPUT + OC 40 
0A.40.56,MS 3586 woROS 1 7166 Max USED) 
0A.40.5H.CPA e442 SEC. 0442 ADJe 
08.40.56.10 0506 SEC. : 2596 ADI. 
06.40.58,CM 16.572 HWS, 2.011 ADJ. 
08.40,58.85 , 1.960 
06.40.59, PP 3.151 SEC. OATE 06727778 


04.40.580.€) END OF JOB» SH 


cE—-6 


PRUGVAM Sud Ee Pashle Phe) 


' PROGRAM SWETCHEINPUTSOUTPUT) 


COMMON A112) 
PRINT boo 
100 FOMMATURHDD 
Ss QFAD Potatdde dated?) 


POINT TetAChdof=tot2d 
Catai PeaPOS 

? FORMAT LOF 20.03 
ENN 


SUPOOUT EINE PRINT] Pasi la OPts) 


’ SUBQOUTINE UPRINTI 
COMYON sSRLOCK ES TORE Cb? T 
PRINE S.ESTNOF CED EzPed rd. 
5S FOwwal ty teah 270 ,ees/7/) 
5 , Fon 


MICTRO 
STORAGE ALLOCSTION. 


ALDRESS CENGTH 
0 2) f0ENE 
2) END 
ALOCKS TYPE 
PHOGHAM® LOCAL 
ALOCK I COMMON 
4/ COMMON 


ENTRY POINTS. 


TRAPOS 


FXTERNAL SYMBOLS. 


UPRINTI 


Cy ee ee 


FIN &,7°670 


COMPASS 3.5-470, 


HIWARY CONTHOL CARDS. 


MtcHo 


aADORESS LENGTH 
0 rm) 
9 14 
0 4 


GAs 20774 


Qn7/21/7A 


04727778 


16.32.93 


16,972.09 


16.32.05. 


rr OLA 


PAGF 


PaGf 


- 2 : 3 1 * . iat 
qs = 


i 


CE-6 


#1cRO 


12 


13 


ll 
i 
a 
1 


TTI 
6110000000 C 


: Sticeceeoe 
$120000003 ¢ 
$130000006 
Siseececii c 
fo6il 
10722 
Sa6te 
S17fe00001 
10633 
floras 


S16 eeoo02 
SI?1000003 


6120000004 


Siteeneoes c 
$120000004 

Sideooeeor ¢ 
$140000012 


Row) 
ROW? 
ROW) 


SAM 


TRAPOS 


c . 
c 


fornet 
ENTRY 
ext 
cist 
List 
MICRO 
MICRO 
MICRO 


MACRO 
SAl 
$A2 
say 
SAS 
AxA6 
Bx? 
SA6 
SAT 
Bx6 
BAT 
SA6 
SAT 
enn 


DATA 
sn 
San 
Sam 


SAl 
$A2 
SA) 
SAS 
Bx6 
BxT 
Sa6 
SAT 
Ox6 
OxT 
SAG 
Sat 
ENDM 


$8) 
List 
San 
gar 
$a2 
SAX 
SAS 
AKG 
Bx? 
SAR: 
sar 
BK6 
AKT 
SAA 


|__| |__|} we — =a ame = 


COMPASS 3.5-470, 06/27/78 84.32.05. 


“@IcRO 

TRAPOS 

POINTE 

“4 . 

A 

Leo Ph oto deMoGeMege 
Looted oMeheMoPeMei ne 
DeePeMereMeS oMoMemepie 


AcAHeCoD 
i : 
a 


eRowle 
Mole JoloG eed 


” 
wos 
Meg 
“eg 
al 
n2 
UD 
Ales 
a) 
na 
Ble? 
Aled 


STORE cs 
oA 
erow2e 
Mel 


gan 
gan 
sam 
$an 
Sam 
SAM 
$an 
San 
san 
SAM 
Sam 
San 
Sam 


San 
SaM 
SAW 
san 
San 
SAM 
SAM 
Sam 
Sau 
Sam 
Sau 


PAGE 


? 


HECRO COMPASS 125-4270, O672777A 16.32.95. PAGE 3 
5171000003 Sar Aled Sam el 
ENN Sam ol 
14 6})10000080 C sat STORt eA 
LIST oN 
Si10000002 C San eROws4 
0100000000 x RJ UPRINTI 
22 0400000000 « FQ tRaPUS 
cist 4 
23 LastwAD ASS 0 GET ADDRESS OF NEKT wOoRD 
23 aa OE CMIC CASTRHD-THAPOSe% GFT DECIMAL LENGIn OF PROGRAM 
23 an OCTMIC LASTARD-TRAPNSSH GFT OCTAL LENGTH OF PROGRAM 
RAGS MICRO Peo®#AA# 1S THE DECIMAL LENGTH OF THES PHOGHANMS 
RAGS MICRO 30290019 1S THE NECIMAL LENGIM OF THES PROGRAMS 
RAC6 MECAD Poet sAhse FS THE OCTAL LENGIM OF THES PROGRANE 
RAG4H MICRU Jo29000023 1S THE OCTAL LENGTH OF THES PROGRANE 
\ P 
$2 OFCLENG MECCNT R455 : NUMAFR OF CHARACTERS IN RAGS 
S2 OCILENG MICCNT RAG6 NUMBER NF CHARACTERS IN RAGE 
52 RAGT OF CHIC NECLENGe4S GET NECIMAL CHARACTER COUNT 
52 RAGA OCTMIC NCILENGe4% GET OCTAL CHARACTER COUNT 
RAGd MICRO Jeo®#RAGTS NECIMAL CHARACTFRS IN RAGTE 
re RAGO MICRO Fee80042 NECIMAL CHARACTERS IN RAGT® 
we RaG1O MICRO Lese®#RAGAF OACTAL CHARACTERS IN RAGB® 
py RaGIO MICRO $2280052 OCTAL CHARACTERS IN RAGAR®E 
USE BLOCK IZ 
0 14 STORE ass 12 
USF 44 
() 4 ™ ASS 12 
USE 1) 
23 END 
474008 SCM STORAGE USED 10) STATEMENTS ? SYMHOLS 
MODEL 174 ASSENALY 0.118 SECONDS - 3) REFERENCES 
*ICRO COMPASS 3.5-470,. O672T/TA = 16.32.056 PAGE 4 
SYWAOLIC REFFRENCE TAALE. 
DECLENG S2 3719 Dp 3721 
Lastwen 2) PROGRAME ibe 3712 373 
” 0 4s 2730 2/32 2747 2749 3706 3/07 
: 27%) @/)3) 2748 2750 307 0 L 
OCTLENG §2 3/20 n 372? ; 
stor 0 ALOCH] 2726 e744 nse VPA 
FAAPOS 0 PROGRAN® 2/0? £ 27egk yoga 3ysip 3413 
UPPINIS 0 FUTERNAL® e703 XK 370A 


SE-6 


$080 MAP - SweETie 


wa OF IME coan 
twael OF THF LOAD 


pon 
bees 


TOANSFFR ADNAESS -- SWITCH 


PROGRAM ENTRY POINTS -- 


“250 


Swltcn 


PHOGAAM AND BLOCK ASSIGNMENTS. 


BLOCK 


Surtcn 
sALOCHI, 
UPRINT) 
MICRO 
SYSAID® 
750P ENDS 
JECL Cos 
798,10. 
GQ2NERV= 
JECLEENTS 


' COnioz 


FCLeFOL 
FLTIN® 
(MTAPS 
FORUTL«] 
GETF ITs 
KRAKERS 
OuTCe 
FECHSK 
FLTOUTs. 
FORSYS« 
INCOMs 
(NPCe 
KODE Ne 
OuUTCOMa 
CMF ALF 
CHF CSF 
Cum Fa 
CHF FRE 


“ CHM.A 


CMF SUF 
CTL $AN 
fRagan 
LCUStsen 
7400 .COMs 
OU PES 
Rt Wales | 
S15 .PM 
uu 


ePSA CP SE CONS 


ADDHESS 


oat 
&302 
a IIA 
#33} 
&I54 
#357 
4360 
£4£05 
4506 
%506 
4546 
“562 
A622 
$000 
sor 
$445 
5526 
6202 
6352 
6413 
o?)0 
#232 
7401 
1610 
voor 
boe7rs 
10655 
1064) 
doar 
10735 
$1150 


bear 


barry 
12020 
Vetoan 
t210? 
vane) 
125958 
Beals 


LENGIN 


FILE 
ico 


60 
L6o 
SL-FORTRAN 


SL-FORTARAN 


SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SUL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL-FORTRAN 
SL -FOHTRAN 
SL-FURTRAN 
St -FORTRAN 
Su-SVSCIA 
SuU-SYSL EA 
St-SvS0 18 
SU-SVSUIB 
SL-SYSL EO 
SU-SVSLIA 
SU-STSL IH 
SU-SVSUIW 
Su-SVSLIW 


SU-STSUIA 
St-SvSt lh 
SL-STSC EN 


& 240 


Dalt 
Ons 2ers 7H 


00721778 
067277 1H 
05/02/78 


05702778 


05/02/78 
05/02/7TH 
0S/uU27TH8 
05/07/78 
05/02/78 
05/07/78 
05702778 
05/02/78 
Os70277Ah 
05702/Th 
OS702sTH 
05/0277A 
ossaesT 
05/02/7780 
OS7U2770 
OS70277TH 
05/02799 
05702778 
o5/u0279A 
OS702779H 
Ors027TA 
O57027TH 
047027 
Os70e7 TH 


OS7IN7 IA 
OS/1HsIN 
OS7 bbs 7h 


Cvs PUADEY 


PHOCSSR 
FIN 


Fin 
COMPASS 
CUMPASS 


COMPASS 


CUMPASS 
COMPASS 
CUHPASS 
COMPASS 
COMPASS 
CUMPASS 
COMPASS 
CUMPASS 
COMPASS 
COMPASS 
COMPASS 
CUMPASS 
CuMmPass 
COMPASS 
COMPASS 
COMPASS 
CUMPASS 
CUMPASS 
COMPASS 
COMPASS 
COMPASS 
CUNPASS 
COMPASS 
COMPASS 


CUNPASS 
CUMOASS 
Cup assy 


PT0nH CM Stnvant USED 


ao? 


4&7 
16% 
5 


VER LEVEL 


470 


«70 
470 
470 


1.e-olh 


“HALNWARE 


FoTn § 


Tot 1 


On7PTZIR be 12M, ” paur ' 


COMMENTS 


PHOGRAM OPts=) 


“SUBROUTINEOP Te} 


LINK BETWEEN SYS@AI0 AND INITIALS ZATION CODE. 


FCL INGTEAL STATION ROUTINE. 


COMMON CODED £70 ROUTINES AND CONSTANTS, 
FCL CAPSULE LOADING 

COMMON FLOATING INPUT CONVERTER, 

CKHACK APLIEST AND FORMAT FOR KODER/NRAXFR, 
FCL MISC. UTILITIES. 

LOCATE AN FIT GIVEN A FILE NAME, 
PROCESS FORMATTED FORTRAN [NPUT, 
FURMATIED @RETE FORTRAN RECORD. 
INETEALIZE CONSTANTS, 

COMMON FLOATING OUTPUT CODE 
FORTHAN OBJECT LIRRARY UTILITIES. 
COMMON [NPUT FORMATTING COOE 
FORMATILO NEAD FORTRAN RECORD, 
OUTPUT FORMAT INTERPRETER, 

COMMON OUTPUT CONF ‘ 

CM4 VEgd - ALLOCATE FIMEQ,. 

Con Vid = CHANGE SPECS FERED, 
CH VEE = FERED FREE ALGORTTHN, 
Cum vigk - FREE FERED, 

CHM VELD = RESTOENT SUAROUTINGS. 
CHM VALE — Serine OF GWA FURFO. 
CRM CONTROLLING ROUTINE, 

Ckm ERAOK PROCESSOR ENTRY. 

Chm ~ aLLOCATE SPACE FOR LES! OF FILES 


FAST DYNAMIC LOADER RESINENT. 
FOL MEMORY MANAGER INFF UF Act. 
PHOCESS SYSTEM HENUEST. 


w? FAHLe MOVES 


l. Ps 4, 4. 


S. %. , a. 

. 19. il. 7. 
t.nnoo «.0n0n Pynnng ta,nnno 
2.no0n 5.0n00 | A,nuan ti.anno 
3.900N 4.0009 2.annn ‘ 12.0000 


arr NA2- CVALTS-SNI SLO7T/R6G —05/15/7A 
16.92.01 .00N00MO0 FROM /SH 
$6.32.03.3P 0000046A WOHDS - FILE INPUT OC 04 


16.32.01.N0N. PSNeO2/Be TACTOLIACMILLER 
- 16,32.0).F TNeR20, . 
(0) 16.32.06, 0210 CP SECONDS COMPILATION TIME 
(ony 16.32.06. HAP oPART, 
16.32.06.160. : bs 
16.32.10, END Sul f Ce 
16.32.10, 0036 CP SECONDS EXECUTION TIME | 
16.32.11.0P 0000206A WOHDS - FILE OUTPUT ¢ OC 40 
NOD20RR IMS 3586 wORUS ¢ 17920 Man USED) 
16.32.12.CPA 0491 SEC. 043) ADU, 
16.32.)8.10 ‘ 2.108 SEC. 2.308 Ans, 
16.32.01. 43.356 KwS, 22646 ANS. 
§16.32.11.558 5.1A6 
16.320112.P°P F.A92 SEC. DATE 067277786 


§6.92.81.€5 END OF JOBs SH 


|__| —— eS {—_———j —w2 Ze ST = way em =a ae 


IKP ECHO COMPASS 3.6-476.6 CE/0G/79 90.25.3206 PAGE ? 


“JDENT = IRPECHO 
ENTHY P 
hhh hth bah tht dtd dbtd itd d dtl LLL ILILILiTitTi iii rTirrryyyryt | 


r r 
° EXAMPLES OF EIRP AND ECHO PSEUDO OPERATIONS 6 
° ® 
. : ry 
Ite IIIT itiiriririrrirrrivivyyyTyrry 


IRPMO MACRO) ARO>sPARN IRP MACRO 


InP ARG 
SAl ARG . 
SA6 X1L¢PARM 
SAG ARG 
SA2 DATA 
UXT x? 
Sal DATA! 
Ine . END OF IRP RANGE 
ENOM 
ECHOHO MACHO PlheP2eP3 ECHO MACRO 
ECHO 2eARGAIPL oP2eP3) 
Sal ARG 
5X6 X10} 
Oo SA6 ARG 
As SA2 DATA 
a Bx? k2 
SAT DATA4) 
ENOM 
eae 
@ 46000 P Ho 
a 
IRPMO =(JeKeolLdek «CALL IRP MACRO 
inp Jeol PRPHO Pe | 
5110000000 c SAl J THPHO od 
1 7261000001 SX6 Xie) ERPMO odd 
5160000000 C SA6 J IRPMO oh 
2 5120000003 C SA2 DATA PRPHO ol 
10722 BxT x2 IRPMO — ol 
2 §170000004 C SAT DATA] 1RPMO el 
5110000001 C SA} K rRPHO mo | 
4 17261000001 SX6 Mel IrpsHo ol ‘ 
5160000008 C SA6 K FReMO ol 
§ 5120000003 C ; SA2 DATA IHPMO ol 
lo722 - bxt x2 LRPHO ef 
6 5170000004 C SAT DATA*} IHPHO ol 
5110000002 C SAI L : IRPHO oe | 
Y 7261000001 Sx6 Xiek TRPMO ot 
5160000002 C SA6 t TRPHO ol 
Ao 65120000003 Cc Sh2 DATA TReMO el 
10722 Bx? x2 : IRPHO el 
11 5170000004 c SAT OATAel IRPHO eo} 
; TRP END OF IRP RANGE IRPMO ol 


ENDM IRPHO o} 


IRPECHO COMPASS 3.6°476. 01/08/79 1002503k. PAGE 2 


ECHOHO JoKol CALL ECHO HACRO 
ECHO JeARGOQIeKeld Ectono of 
SAl ANG ECHoHO of 
Sk6° Khel ; Ecuouo ot 
SA6 ARG . ECHOHO of 
i vt _ $110000000 ¢ SAL J *ECHO® o2 
12 7261000001 SKk6 Xaek ; *ECno® 22 
$160000000 C SAG J *ECHO® 42 
13. 511000000) C Sal K *ECHOS 42 
7261000001 SX6 Xies *ECHO® 42 
14 5h60000008 C SA6 K ®ECHU® 62 
§110000002 C Sal t *ECHU® 62 
15 1726100000) Sk6 Xbeon : *ECHO® 62 
§160000002 C SA6 u : ®ECHO® 62 
16 © §120000003 C Sag DATA . ECHOHO of 
10722 OXT x2 : ECHOHO of 
17) -ShTO0OO00Gs C SAT DATACh ECHOMO of 
P , ENDM ECHOHO «ot 
716024702) ENDAUN 
° . 
use JIAPECHOS 
0 00000000000000000000 Jd DATA 0 
1 00000000000000000000 K DATA . 0 
: 2 00000000000000000000 L DATA 0 
‘ 3 00000000000000000000 DATA DATA #0020 
1 21 ; END P 
é 
00 476008 CM STORAGE USED 85 STATEMENTS 6 SYMBOLS 
HODEL 73 ASSEMBLY 00304 SECONDS @ REFERENCES 
MFS Nul- CYHTs-SNI08 =~ Scvnoan = AAJ RO7T8 
10.23.42.DOND0K2 FROM Ou 
10.23.43.1P 00000320 WORDS - FILE INPUT » DC 04 
10623.43.DONGTS. O08A0600301896eHILLER 
10.23.53. REWIND OUTPUT. 
10.25.30, COMPASS »L O=UHEH, 
90.25.32. ASSEHULY COMPLETE. 476008 CH USED. 
10.25.32, 0.492 CPU SECONDS ASSEHULY TIME. 
: 10.25.32,.0P 00000896 WOHDS = FILE OUTPUT » OC 40 
10.25.32.4S 3544 woRDS ¢ 7168 HAR USEO) 
0.2%.32.CPA o29¢ SEC, 2292 ADJ. 
10.25042.CPH + 0327 SEC, 0327. ADJ. 
10.2%.52.10 e3hd SEC. F e331) ADJ. 
10.25.32,CH 7.4h) MWS, 1.062 adv. 
$0.25.32,55 1.994 
10.25.32.PP 4.309 SEC. DATE 01/06/79 


10.25.32.EN END OF yous ton 


| . ) ws - 
eeeeeeee ws ee eg oe oe Ue he 


Lesson 10 


CONDITIONAL ASSEMBLY 
LESSON Preview: 


THIS LESSON COVERS THE DEFINITION AND PSEUDO OPERATIONS 
THAT ARE USED IN CONJUNCTION WITH CONDITIONAL ASSEMBLIES, 


REFERENCES: 


CHAPTER 4. Compass REFERENCE Manual #60492600 
- TRAINING Arps: 
Visual Set 10 


‘PROGRAMMING PROJECT 6A AND 6B 
OBJECTIVES: 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE 
- ABLE TO: 


1. WRITE A PROGRAM THAT UTILIZES: 


A. ENDIF 
-B. ELSE - 
c, IFTYPE 


D, IFOPERATION 
E, IFConDITION 


2. USE CONDITIONAL ASSEMBLY 


10-1 


a 
a 
a 
. 
| 
a . 
a 
| 
. PRovects: 
a 
a 
i 
| 
| 
a 
| 
a 
| 


CONDITIONAL ASSEMBLY 


I,E., TEST LEGALITY OF PARAMETERS PASSED TO MACRO 


NAME 
LOAD ~§ -MACRO 
IFC 
ASSEMBLE THIS——?94 REG 
IF PARAMETER IFPP - 
LEGAL ERR 


ASSEMBLE THIS ENDM 
IF PARAMETER 


ILLEGAL 

THe CALs: 
LOAD 
SA.2 
LOAD 
ERR 


REGISTER ADDRESS 


REG, ADDR 
LE, $REG$5$,2 
ADDR 
1 
1s 
REG 
PARAMETER 
. LEGAL? 
IF YES, 
ASSEMBLE 
NEXT 2 LINES 
ZiX 
A LEGAL CALL 
Y GENERATES 
THIS CODE 
7X 
AN ILLEGAL CALL 
GENERATES 
THIS CODE 
10-2 


IrcsPP . FAMPASS 1645-4670, ORS2ZTZIN 16.20. 2he PAGE ? 


tnene reser | 
ENIQY tant : , 
List « 
SCOSSOHHHSEHHHHOHG EH EHOEOHHS HH HFOHHHTES SHES HHOTHHHHSHSOHHRESHOEEOOHLOSONOEEHECTEEHEES 
° e 
° : e- 
e IFC VSFIDN OPEHATION - COMPARES TWO CHARACTER STRING ACCORDING 10 THE®. 
° OPERATOR SPECIFIFO AND ASSFHRLES INSTRUCTIONS [IN THE TF RANGE TF THE © 
° COMPARISON 15 SATISFIED. = 
e e 
° IFTVPE EPSFIICO INSTRUCTION TEST FOR THE TYPE OF PROCESSOR THAT WILL id 
° EXFCUTE I OAJECT PHOGR OM, AS NECLAREN BY MACHINEs AND PERIPH OR PPU 
e 
® 
e 
e 
e 


PSFUUO INSTRUCTIONS. bs 
e 

PP = ANV PEHIPHEPAL PROCESSOR UNTT Ms 
: : * e 

e 


toao MACRO REGeADOR 
IFC LE SREGSOS01 
€RA : 
IFC =—s-_ LE e SREGES8 02 TEST PARAMETERS 
> SA.REG anne 
e Ifpe t 
eRe 
i FNOK 
e 
0 00000000000000000N03 Y DATA 9 
t 46000 START NO 
LOAD = Poy LEGAL CODE 
Ifc LE 8280868 Loan el 
ERa 7 Loao os | 
fc LE $2858.02 TEST PARAMETERS Loao of 
§120000000 ¢ sa.2v: Loao ol 
IFPP 1 Loao ol 
FRO LOAD | 
fNDM : Loan 
“Load Mev TLLEGAL CALL 
re LE oB780861 Load oe | 
€RQ ; LOAD ot 
FC CE eB 735802 TEST PARAMETERS : LOAD ol. 
Sa,7 Y Loan el 
tFeP ’ : : . toao ol 
id ; Err : Load od 
ENDM toao of 
FNNDRUN y 
2 7160247021 SKA JREND® Gt ; ENDRUN 
20450 x4 40n ENDRUN oD 
3 0100000000 x AJ eXSVSe : ENDAUN OD 
FNDM ENNAUN Ot 


NFFAULT SYHAOLS DEFINEN Av COMPASS. 


| SvSe 


rain etant 


ircsee ; COMPASS 1.5°4.70, Of72777H 16.20.24. PALE t 
STORAGE ALLOCATION, 


acOREss LENGTH Hivany CONTNOL CANNS. 
0 & nent = pFesee 
4 . fFND stant 


ENTRY POINTS, 


START e 


EXTERNAL SYMAOLS, 


SVSs 
i¢c7Pe COMPASS 3.5-4670, 06727778 16.20.24. PAGE 3 
&7300R SCM STORAGE USEO 5? STATEMENTS 2 SYMAOLS 
MODEL 174 ASSEMBLY ; 0.950 SECONDS § REFERENCES 
) ERROR IN IFC/PP 
ht 
i) a 
i 
e tec7ee ; ; COMPASS 3.5-670. OH/27/9H 16.20.24. PAGE ry 
€eRNR OIRECTONQY, : 
® TYPE FRROHW CONSULT CESTINGS ©0N HEASON SEHIND P-FRHOK, 
CCCUNRED ON PAGES ? 
iF C7seP COMPASS 3.5-470 Ons2rs7e8 tl 0.24 PA 
SYMROLIC REFERENCE TAALE. . ° Sek eens aid : 
Ssvary . 4 PROGRAMS 2/702 € 2/729 1 ; 
SYSe 0 ExTEANALe 2/750 MFF = NB2- CYARITS-SNI @L87/R6B 05715776 
v 0 PROGHAHe 2720 t 2/34 16.20.22.00N00MH FROM “SH 
16.20.22.1P 00000320 WOHDS - FILE INPUT » OC 04 
16.20.22.00N. PSPeOZ27TBe T2CTORIACMILLER 
16.20.24. COMPASS, 
16.20.24, 2 ERROR IN IFC7PP 
16.20.24, ASSEMBLY ERRORS, 473008 SCH USED. 


16.20.24. 0.100 CPU SECONDS ASSEMBLY TIME. 
16.20.24,.0P 00000896 WORDS - FILE OUTPUT » OC 40 


16.20.24,4S 358% woROS { 7166 MAX USED) 
16.20.24,CPA 0126 SEC. ol26 ADJ. 
16.20.24.10 0497 SEC. e497 ADS. 
16.20.24.CM 8.848 KwWS, 0540 ADJ. 
16.20.24.55 1.164 

16.20.24.PP 2.612 SEC. DATE 06727778 


16.20.24.£45 END OF J0B> SH 


De] || || | | | | 


Conpase 


wi we @ 


S-OT 


lz 


13 


FULOTIIIIG 
loath 
5160000000 ° 


S$i2n00001) » 
10622 
Sie00000n1 « 


S$t30000012 « 
10633 
$160000002 « 


MHRO0247021 


00000000000005477766 
00000000000001000000 


4?rionA SCH 


COMPASS 3.5-670, 06727778 09,0R.2h. 


IDENT = CONDASH 
ENTRY CONNASH 


Lest NeoG 
SCOOEOSSSO OSH SEOHOHEHEHAOSRHSSOOHOSSETHSHAOHAHOHEHHSSOHHOHOHOOOHUHOEHHEHHEEHACHEEOE 
e 4 . 
e A 
° 1FLE AND FFGT TEST VALUF OF PARAMETER VAL 10 DETERMINE WHETHER TO SET® 
° AN KX AEGISTER WITH A CONSTANT ¢<18 BITS? OR SET AN A REGISTER TO A 
e LITERAL (>A BETS). NOTE CODE GENERATED BY EACH CALL. 
° CAUSES ONLY THE CODE GENFRATED To BE LISTEDs NOP ALL THE CODE. 
e ‘: 
: . 
POST TIT ITII l 
Sri MACRO REGAL 

‘ IFLe VAL eFTTITIAS! 

SK.PEG VAL SET x TF A SMALL NUMRER 

wel VAL oT?7777B01 

SA.REG =VAL a SET A Jf LARGE NUMBER 

€NDM : 


ANSVER Bssz 3 
CONDASH SETH Ler?I7TI6A 


SK.) 7777 T6N SEY x 1F A SMALL NUMBER 
AXé al 
SAA aNSWER?O 
e 
SETx 2eS47TT66A 
GA.2: 2547771668 SET A IF LARGE NUMBER 
ANG n2 
San ANSWER S$ 
Sm Je 1000000A ; 
SA.3 10000008 SET A TF LARGE NUMBER 
AXA x) 
5A aNSWERe2 
List -G 
fNNRUN 


DEFAULT SYMAOLS DEFINED By COMPASS. 
SYSe 
CONTENT OF LETERALS BLOCK, 


Eety 
A 


END CONDASM 


STORAGE USED 45 STATEMENTS 3 SYMROLS 
MODEL 37% ASSEMALY 0.045 SECONDS 7 REFERENCES 


THE LIST G 


SETR 


SETK 


SET 


PAGE 


2 


LOAD WAP ~ CONDASH CYAEA LOADER §.4-4708 06727778 09.0.2. PAGE t 


TWA OF THE (oAD TY) . . 
Luact oF tHE LOAD 164 

TRANSFER ADDRESS ~- CONDASH rT 

PROGRAW ENTAY POINTS -~ " conoasH ite 


PROGRAM AND BLOCK ASSIGNMENTS, ‘ 
BLOCK ADDRESS LENGTH Fe Date PHOCSSR VER LEVEL HARDWARE COMMENTS 


CONDASH bos 3 co 06727778 CUMPASS 3.5 476 _ 
ba S¥S.RM nae 80 SL-SYSLIB 8 8=60S5/16/78 CUMPASS 3.5 470 PROCESS SVSTEm REQUEST, 
? 
Oo 0025 CP SECONDS 13200n CH STORAGE USED 0 Tasr€ wove 
wv 
Bune RELATIVE ’ NMP CHD 270 

oonte oreree verry rvvye vrrte 00000 80000 nonsSe TITH6 0000 00000 00010 eo00e 

OO1dS =«PdNOT PFPIG OGLE Soncn $1600 Goths 58200 00122 §0622 $1600 OOtI2 46000 51300 90123 10633 seecee 

e0l2e 89600 00893 TAO S7n2t 20650 016000 40426 ann00 00608 80008 00054 FrTE6 Ce00e 00600 Coole sence 

00324 04800 60137 e000 00000 01300 00000 nenne 00000 04008 C0122 00000 encoe Sttee enees 02010 oolz? 


wer NA2- CYAEIS-SNE 4LO7/R68 05715778 
69.08.2%,00N0059 FROM $n 
09,08.25,1P 00000320 wOHOS - FILE INPUT » OC 64 
09.06.25.00N. PSOc02 He T2CTOULA MILLER 
09,006.26, COMPASS, 
09.06.27, ASSEMALY COMPLETE. ‘47300R SCH USED, 
09.0h.27. 0.097 CPU SECONDS ASSEMBLY TIME. 
09.06.27.160, 
09.08.28. OMPULIDI27D 
09.086.26.0P 60000996 WOHDS - FILE OUTPUT » OC 40 
09.00.28,.6S 3sa6 wonus ¢ 0752 Man USED) 


09.08.20.CPA 2050 SEC. 2850 400, 
09,06,.28.10 0433 SEC, 0633 ANS, 
09.06.28.CH 10,637 dws, 2649 ADI. 
09.00.20.55 1.4693 

09.00.28.PP 3.020 sec.’ DATE 067277786 


69.00.25.6 3 END OF JOBs SH 


Conditional Assembly 


COMPASS Manual, page 4-63 ff 


CONDITIONAL ASSEMELY 


Certain parts of a MACRO code sequence may not be needed every time the MACRO is _ 
called. Tne COMPASS assembler can check for conditions es it is assembling the 
code and assemble only the appropriate code. For instance, we might want to check 
for missing or incorrect variables. In the AVG MACRO that we created, we could 


put in these tests: 


AVG MACRO 
IFC 
A ERR 


SAl 
Sx2 
™6 
SA6 
ENDM 


10C1,NUM,LOC2 

EQ, *LOC1**,1 

ASSEMBLE IF LOC1 MISSING 

-ABS, NUM, 1 : 
ASSEMBLE IF NUM NOT ABSOLUTE 
EQ, *LOC2**,1 

ASSEMBLE IF LOC2 MISSING 


LOC] | PICK UP SUM 
NUM . NO, OF ITEMS 
X1 /X2 AVE=SUM/NO. 
LOCc2 STORE AVE 


In the Extract OP DEF we could test for other conditions: 


EXXQOQQ  .- OPDEF 
| IFGT 
A ERR 
IF 
FIRST ‘SET 


Rl], R2, FIRST, LAST 
R1,7,1 


"DEF, FIRST, 1 


0 
DET, LAST 
$9 


FIRST, LAST 
60-FIRST-1 
eX. R1*X. R2 
LAST 


60-LAST-1 


eX. R1*X, R2 
FIRST 


10-7 


Conditional tests are line oriented. Testing can be limited by a line count as in: 


IFC 


EQ, *LOC1**,2 


2 = Line count so assemble next two lines of test if true. 


NOTE 


Conditiénal-Ass ae | 


Testing can also be limited by an ENDIF, when no line count is specified as in: 


IFGT 
MX.RI1 
BX.R1 
AX.R1 
ELSE 
MX, Rl 
BX. R1 
AX.R1 
ENDIF 


CHECK2 


LAST 


CHECK2 


FIRST, LAST 
60-FIRST-1 
2X, R1*X. R2 
LAST 


60-LAST-1 
-X. R1*X. R2 
FIRST 


IF 
SET 
ENDIF 


lf test was true, assemble. IFGT 
If test was false, skip. 


If test was true, skip. 
If test was false, assemble. ELSE 


MX. R1 
BX.R1 
AX. R1 


MX, R1 
BX.R1 
AX.R1 
ENDIF 


10-8 


IF statements without tags (as above) are terminated by an unlabeled ENDIF. 
statements with tags are terminated by an ENDIF with a metching tag, as in: 


The effect of an IF test can be reversed by the ELSE statement as in: 


FIRST, LAST 
60-FIRST-1 
-X,R1*X, R2 
LAST 


60-LAST-1 
-X, Ri *X. R2 
FIRST 


iP 


ant Prue. ; : COMPASS 1.5-4780, CA/2EFIA 09.05.84. PAGE ) | 


Sineace ape ocat yarn, 
arnegss ENE Aiyvauy cOntwaL Cans. 
° 1) UNF NS ANE ge ; : 
a : Chie 0 TeaNSFER ANONESS FOM SUunROUT tne 
ALOCKS Tver ADDRESS LENGON 
PUDKAAM® LOCAL 4 i) . 
NUMHFRS = COMMON a) camer 


ENTAY PORNES. 


QT bnuG oe 


6-OT 


ANT POUG 


OT-OT 


2 


' 
460008 
Vreseoeery? 


tnzes 


63626 
6170000033 

OVOVTVVIVG 
6170000046 

OTVTETITIIG 


20106 
i201 
63620 — 
4070000033 
OTETTIVIIG : 
6170000044 
OVIGTITFIVG 


634620 
617000003) 
OrMETIVINIG 


6170000044 
AVIAPVP VIA 


Sppeecooee c 


COHPASS 3.5~476, O6/29778 09.05.14, PAGE 
1OCNT sNEtuUG 
ENTAY ANE LUUG 
List s 


DATAIN 


OF BUG 
ANT }QU6 
° 


USE OF THE IF CONDEVEONAL PSEUDO OPERATION 
PROQHAM SHOWS AN ANTIBUGGING TECHNIQUE FOR A COMPASS SUBROUTINE 


@ 
e 
e 
e 
e 
. e 
THES EXAWPLE USES ANTIBUGGING CODE TO PREVENT UNEXPLAINED ERRORSe1 .E.° 
A SUBROUTINE MAY INCLUDE THIS CODE 10 TEST FOR NON-NUHNERIC OLSPLAY ° 
CODE CHARACTER AND ABORT Wie JOB IF FOUND. FF THE CHECK ES NOY Of @ 
SENEDs THE STATEHENT SOEB8UG EQU 16 18 REMOVED AND THE CHECK £5 NOT ® 
HAvE,. « 

e 

® 

® 


POBESHHOSHEHOHHEEEHSHOHHEOHOHDOHEHSHEHEEOEEOHOEHASESEHOKHAHREHODHOOHOCCREEHROCH 


use ANUHOERS 7 

ass 2 

USE e 

fau 4 

NO 

$x0 778 SET UP MASK 

SAQ DATAIN e 
Bx2 xoexnt ISOLATE LOW ORDER CHARACTER OF XB 
iv NEF OF HUGS TEST IF DEBUG IS SELECTED 

$06 n2 VEST If u2 US BETWEEN © AND © 
say Ao 

ut HO BVo-! ABORT JOB IF K2 L¥ DISPLAY CODE @ 
sar ¥A9 

or 06.87 e-1 ‘ ABORT 30H IF X2 GY DISPLAY CODE 9 
uw o€¢ ,OFBuG 

ont 4 

One noont 

$86 n2 

se? 18o 

me | ROBIe-3 

Say yA 

GT 16.B)e-) 

CuNolr 

VW. DEF VE8UG.S 

Sab n2 

say Ra 

ut NO Berk 

ELSE 2 

sur ae 

GI No Ale-t 

if -OF F OERUGSS 

$06 née 

su7 pha 

| nb6,Ble-)} 

FUSE 

say pag : 

ay AA.AFL 88 


ANT EPO COMMASS 9.5-070, 067217778 09.05.16. PAGE 3 
° COUTEINGE PROGRAM : 
3 . 
12 0600090000 « fo ANTIHUG RFTUEN TO CALLER 
a END NO TWANSFFR &nDRESS FOH SURROUT ING 
S7100H SC STOVAGE USED G1 STATEMENTS 3 SYMROLS 
“OF Ife aSsSFMALyY 9.057 SFCONNS fn REFERENCES 
aNT AUG COMPASS 3.5-670, 06727778 09.05.14. PAGE 6 
SYMBOLIC REFERENCE TAPLE. 
Ant iBuG U] PROGNaMe 2702 £ e729 dvny 
OATaIn 0 NUMHERS 2720 t e725 
DeRUG ' 2722 0 272ea F 2735 F 2s4h F 2/Si Fr 
kr - & 
T C9AP MAP — ant oR - CYRFR LOADER 4.4-470 Of/727778 09.05.16. PAGE t 
hk 
=) 
we OF THE Foan tat 
Lwael Or Ter Loan ' $248 
TPANCFFO ANFRESS ~- ANTIAUG ins , 
PROGDAM FNTQY PYINTS -- QNnTINUG vn) 
. PROGRAM AND ALOCK O<SIGNMENTS, 
ALOCK aDoveEss LENGTH FILE Oate PROCSSA VER LEVEL HARDWARE COMMENTS . 
JNUMAERS, tit 2 
anTqRUG 3 13 ico 06/27/78 COMPASS 3.5 470 


1% CP SECONDS $32008 CH STORAGE USFD ; 4a TABLE MOVE 


P 000000 
Ra 264400 
FL 000200 
€4@ 7o0700 
RE 000065 
FE 000000 
Ma 001200 
ko 0000 


nb 6000 
x2 0000 
nd 0000 
xe 0000 
nS 6000 
x6 19505 
xy 0000 
00000 
00054 
00060 
00064 
o0070 
00too 
Oump Re 
aa oon 
ra oonls 
tr 
N 00120 
OO124 


40 000700 RO oHOn00 
ab noorth 8b oo0n0) 
a2 000040 82 ouonoe 
4} noons? AD HI279) 
46 000008 AS 600201 
45 000383 AS 00049) 
46 000001 AA o000)) 
ay 000008 AF 00003) 
0000 0000 On00 O077 
0000 0004 G040 O8df 
0000 0000 0000 ool) 
6000 0000 0000 0000 
6000 0000 0v00 0000 
0000 0004 0040 0000 
1520 0000 0000 0061 
0000 0000 0000 6000 


Coon? TITTH YVOOHD 00000 
Solto 03190 00054 S“7IO 
15058 $2000 00000 0006) 
14078 70000 voono o0n00 
05300 50325 24055 10816 
#54000 00000 01000 00001 


CATive 


60000 00700 #4004 00013 
71000 CONT? SELOO CONN) 


63620 61700 00033 46000 


68700 008% OFFAT PITT6 


OMPehI tot 7?, 


‘Ctalr= 6000 O00 000% 0040 
Ciaégss 1505 Jbo20 0000 0000 
Ceadd= 0000 unnnh ovoo 0000 
CtAsds 09000 voon 0000 a0n0 
CUASD=S 6900 0460 0061 000% 
Cia6ds 0700 voon ovne «000 
CtATi=® 0000 voo0n 0000 onn0 
00000 00000 non00 00000 
S1l00 00008 o338U 00055 
00000 On2u0 adooY O00! 
00000 00000 00000 00126 
24h80 22507 62550 00000 


00113>46000 44000 41000 46000 
B20) HIACO AdIOO.00033 


O67? T7776 44700 00066 


04000 Notts Anno 46000 


ous Ctatb=s ¢@000 06000 00600 8000 0000 


006) Cik2bs2 9000 0000 0800 0000 o000. 
noon Cth be 
0n00 Citebe 


6000 ClASDs 4600 0440 006) 0004 6000 
0000 Cinat=s 9900 0000 hoa 0000 0000 
0000 CthTbe 0000 0000 0000 0090 0000 


00000 €0000 00000 00000 
04000 60063 00000 00021 
00000 00000 40000 00000 


64550 02558 00000 46000 
07040 00066 S1600 00008 
40000 00000 02000 oottt. 
00000 00008 90000 o0000 


O?677T FIVTIG H170O 00044 O7T67 T7IT6 20306 ttZ08 


OV76T PITI6 63620 46000 61700 00033 oar? TrT?6 


A0008 00068 04004 00126 ON177>6e000 eoece 04004 GO1T? 


“FEF NR2- CYAL?S-~SNI 4L87/R68 05/15/76 
09.05.10.00N005Y FROK 73H 
09.05.10.1P 00000512 wOHOS - FILE BnNPUr +» OC 04 
09.05.10.00N, PSHeOZTASTACTORIASMILLER 
09.05.1}3.COMPASS, 
09.05.14, ASSEMBLY COMPLETE. *7300AR SCH USED. 
09.05.15. 0.196 CPU SECONDS ASSEMOLY TIME. 
09,05.15.L0ADILGO) 
09.05.15 F MECUTE (ANT BUG) 
09.05.16.FRROA MODE 20), ADDRESS @777776 
OF.O5-16,ENIT, 
09.05.16. DMPoLdD OAPI, X 
09.05.16.0P 00001280 wONDS ~ FILE OUTPUT » OC 40 
09.05.16.MS 3584 woRDS ¢ 10752 MAN USED) 


09.05.16.CPA ob46 SEC. 0146 ADJ. 
09.05.17.,)0 0650 SEC. 2650 ADJ. 
09.05.17.CH 10.412 Kus, 0647 ADJ. 
09.05.17.55 1.464 

09.05.17 .PP §.597 SEC. OATE 06/27/1786 


09.05-17.€5 ENO OF JORs SH 


PROGRAM INITEAL Ta/T& = CP Tel : : ; FIN 4,60464 02/25/77 16.09.89 PAGE i 


r PROGRAM INSTIAL COUTPUT) 
COMMON /ANSWEAZ BUFFERTE6) 
* CALL Staat 


PRINT 100s (BUFFERED of=3eLGF 


8 $00 FCRHATIGO22> 
END 
SUBROUTINE ERHHSG) WasT4 CPrej 3 rary Per YY YY" : 02/25/17 16.09.59 PAGE : a) 
1 SuenouT the ERAYSG) 
100 FORHATURH) Ye kes WHITE EARAONE) 
AC TURN 
s tho 
SUBROUTINE EARMSG2 74/14 = OP T= FIN 4.60464 , O2/25/T7 16.09.59 pace 1 
1 suaagut ine CARKSG2 
= : PHINT $00 
° 100 FORMATIBN}.© ECS READ ERROR®) 
es RETURN 
ae s END 
Locréo COMPASS 3.4-444, O2/25/T7 16.10,086 PACE t 
gt Soace nCocavione : Z ey 
ADDRESS «LENGTH BINARY CONTROL CaROS. 7 
0 56 IOENT {OCT600 
56 ENO 
BLOCKS TYPE ADDRESS CEAGTE 
PROGRAMS LOCAL 0 5¢ 
ANSWER COMMON 0 20 


ENTRY POINTS. 
stant — 4ge 


EXTERNAL SYMBOLS, 
ERRMSG) ERRMSG2 


VI-OT 


e rer 


eer 


Locrsoo 


20 


00000000000000000001 
00000000000000000000 


Slooo000RG © 
1100000000 


"0820000042 


01)0000012 


5120000001 
StJo000002 ° 

5149000003 
36612 . 

36734 

5160000000 
$17000000) C 

5110000004 
5120000005 « 

5130000006 
5140000007 « 

36612 

36734 

5160000002 C 

§17000000)3 
$100000014 

7100000012 


0110000007 
0100000014 


00000000000000000000 
5110000000 « 
512000000) 
5130000002 « 
5140000003 
3762) 
J1T346 
5160000004 
58?0000005 C 
51000000146 


ThODODOU2) 


0110000007 
0100000014 ¢ 


00000000000000000000 


ANSWER 


“OPER AND 


STARy 


Aop 


ENDIALK 


suet 


ENO2ZaLK 


MULT 


IDENT 


MACHINE 


Enfny 
EAT 
use 
nss2z 
uSE 
OAtAa 
Oalta 


RJ 
Loc 
DATA 


COWVPASS 34-444, 


corceeg 


START 
ERAMSGI SERRMSG2 
JANSWERS 

16 


0 

Doce de Ge 5 ebeT et 
0 

ano 

0 

4 


LALOCKT 
CHULOCK] 
aoo 

OP ERAND CO 
OPERANDe} 
OVERANDe2? 
OPERANDe3 
RPoxe 
n3exg 
ANSWERCO 
ANSWERe| 
OPLERAND ot 
OPER AND eS 


_OPERAND 66 


OPLERANDCT 
Kbene 
RING 
ANSWERC2 
ANSWERS}: 


ADU 


CLULOCK! 


! 

LOLOCKe 

aou 

abo 

0 

OPERAND +9 
OPERANDe} 
OPERANDe 2 
OPERAND ey 
X2-K) 

nI-K4 
ANSWER OG 
ANSWLACG 
aon 
LULOCKEeLALOCK? 
? ‘ 

’ 
CULOCK) 
apn 
aun 
a 


02/25/77 16.20.0860 


PAGE 


Locrs6o0 ; , COMPASS 3, 4-h0u, 02725777 16.10.08 PAGE 3 
tS Sibo0000000 « $a} OPERAND +O 
5120000001 « ‘ $n2 OPERANDS] | 
26 S330000002 « $A} OPERANDS? 
$140000003 «  §he OPERANDs3 
A? 42612 146 xbex2 
42734 : 1x? KJOxXs 
$160000006 ¢ SA4 AKRSWER CS 
L 20 =SiT0000007 C S47. ANSWERO? : 
S$100000014 « 5A0 ado 
21> = 7300000030 . Sx0 LBLOCKE +LALOCK2¢LALCCK3 
IFCP6 2 a 
IFCPT 4 
Oflo000012 RL LHLOCKS 
L 22 OL00000014 « EnNDIBLK RI apo 
t te i : ; Loc apv 
L 14 00000000000000000000 O1Vioe. DATA 0 ; 
L 15 SIf0000000 « SAl OPERANDsO 
‘ $120000004 « SA2 OPERANDe) 
c 16 Si30000002 « Say OPERANDs2 
_ §140000003 « ‘ SA4 OPERANDs3 
l 17) 2710) © Px) x1 
27202 PxKe x2 
24101 Nx] xt 
"+ 24202 NK2 x2 
t 20 4462} ; FR6 x2/x1 
27303 PK) x3 
hk 2Th04 PRG x4 
7 ; 24303 - ONKD x9 
bw t 21) 24008 : NKG XG 
ul aaTaz FXT XO/KD 
$160000010 c SA6 ANSWER CQ. 
L 22) S$1I7000001) C Sal ANSWERS9 
26666 UN6 X60D5 
26777 UXT x700T7 
L 23> 22666 LX6 XOoNG 
22777 x7 x?onr 
$160000012 ¢ SA6 ANSWERO10 
t 24 $170000013 ¢ Sar ANSWEReH] 
t 25 0400000010 « ENDSBLK £0 START 
l2 LOLOCK} EoU FNOLULK-ADDe | 
1? LeLOcK2 E€oU ENOZHLK<SURT OE 
7 LALOCK3 Eau ENDIBLK=MULT OR 
le LBLOCKS £OU = ENDGBLK-DIVIDES} 
“2 LBLOCKT Eau LBLOCK 1 +LBLOCK2 +LBLCCKI*L BLOCKS ’ 
12 MAaXOLK = MAX LBLOCK) oLBLOCK2sLBLCCKI+LBLOCKS 
7? MINBLK =MIN LBLOCK A sLOLOCK2eLBLCCKILBLOCKS 
56 END ; 
472008 CH STORAGE USED 114 STATEMENTS 20 SYMBOLS 


VODEL 74 ASSEMBLY 06343 SECONDS 94 REFERENCES 


Loc7600 COMPASS 3.47444 02/28/77 16.10.08 PAGE 4 
SYPBOLIC REFERENCE TABLE, ; _ var peat 
00 4 PROGRAMe 2710 2717 & © 2799 2780 2756 3714 3740 
2716 2/3) 2740 2/55 3709 3715S 
ANSWER 0 ANSWER 2706 t 2/24 § 2/32 $ 2749 § 3/08 § 3732 $ 3738 $ 
2/23 § 2/31 S$ 2/48 S$ 3707 S visi $ 3/37 $ . 
CIVIOE 44 PROGRANe Viet 344) 
EXCLOLK 25 PcOGRAMe 2739 L 3/40 
ENOZALK 22 ProbRaMe 455 L 3say 
EKCIULK 22 PROGRAMe 744 3442 
CHOGALK 25 PooGRAMe 3/39 L 3/4) 
FPANSby 0 EXTEKNAL® 2/704 XK 
(GR 4562 0 EATERNAL © 2704 X 
LOELCCKT 42 2/14 3/44 0 
LBLCCK) 12 2715 2/724 2751 3/10 3740 D 3744 3743 3746 
LPLCCx2 ? 2/38 2/51 3710 3741 0 1/44 3745 3746 
LBLOCK) 7? 2/54 3710 3442 0 Js4e 3/45 
LELOCKS 12 3783 37439 0 3/44 3745 
PARBLA fe 3745 0 
VIROL 7 37466 D 
70 el 4 PROGRAMe 2/57 L 3/42 
CEERANOD 0 PROGRAMe 2708 t 2719 2726 2742 2/48. 3703 3718 
2ryt 2720 2/27 274) 2/01 3704 3719 
, 2718 2725 2/28 2/44 3702 3siy 3/20 
start 10 PROGRAMe 2703 € 2709 & 3/39 
tw suer 16 PROGRAMe 2744 3/41 
fen) 
1 
tH ' 
fo) 
MFS WNOS/EE Be2 RESIA/RIB 02/02/77 


$6.09.239.,00N00HY FROM ALE 
16409.39.1° 00000832 WORDS - FILE INPUT » OC 04 


16.09.39,00N. COLASO904S eo TIGTIOOASMILLER 
16.09659.,F TNeR30. 

16.10.08, «639 CP SECONDS COMPILATION TINE 
16-10,0A8, MAP ePART. 


1O.10.09.EKIT, 
16.10.09.0P 00001408 WORDS = FILE ouTPUT » Oc 40 


16.10.09,S 3584 wORDS ¢ 14336 MAX USED) 


16.10-09.CPA 2630 SEC. 2636 AUY, 
16.10.09.CP8 0146 SEC, 0146 ADJ. 
6.30.05.10 2.124 SEC 2.124 ads 
tel iecioces 55.574 KwS. 3.391 ADJ. 
16.10.10.55 6.299 

16.10-10.P°P 14,273 SEC, DATE 02/25/77 


Lo.10-10.E5 END OF JOUs LE 


i 


PROGRAM SNITIAL Taste cere) 


FIN 4.60444 02/22/77 06.31.07 PAGE a 
i PROGRAM INITEAL touTPUT? 
COPMON /ANSWER? BUFFER(16) 
CALL START 
PRINT 100+ (BUFFERCTD ol=1016) 
b 100 FCAMATI«e022) 
END 
SUBROUTINE ERNHSG} 14/74 CPT FIN 4.60408 02/22/77 06.31.07 PAGE 1 
t SUBROUTINE ERAPSG) 
* PRINT 100 
100 FORHATIRMI,©e ECS WRITE ERRORS) 
fe RETURN 
s tho 
SUBROUTINE ERRMSG2 74/74 CPT : FIN 4.60408) 02/22/77 06.31.07 PAGE 1 
a 1 SUBROUTINE ERAPSG2 
(o) PRINT loo 
Fa 100 FCAMaTtihl,e ECS READ ERROR) 
RETURA 
4 
s ENO , 
10C7600 : COMPASS 3.4444, U2722/T7 06.32 120 PAGE 1 
STCRAGE ALLOCATION. , 
SODRESS = LEAGTH BINARY CONTROL CARDS. 
0 61 IDENT LOCc7Té600 
€) END 
ELOCKS TYPE ADDRESS LENGTr 
PROGRAve LOCAL — 0 61 
ANSWER COMHON 0 20 


ENTRY POINTS. 


start 10° 


EXTERNAL SYMBOLS, 


ERRMSG ERRKSG2 


L0C7600 


le 


ay 


— 
ae 


16 
i? 


20 
21 


8T-OT 


2) 
24 


r+) 


26 
1S 


is 
16 


17 


err err 


20 


t et 


L 22 
l 23 


‘ 


22- 


20: 


60000000000000000008 

00000000000000000000 

5i00006015 ¢ 
7100000000 


0120000044 
0100000000 


Onioo000012 
0100000000 


0400000015 
$110600000 ¢ 
5120000008 
$130000002 « 
S1409000003 
36612 
36734 
5160000000 
S170000001 C 
5110000004 
§120000005 « 
5130000006 
$140000007 « 
3€612 
36734 
$160000002 C 
5179000003 
§100000015 °« 
7100000032 


O1l0000010 
010090000000 


0100000035 ¢ 


00000000000000000000 


5110000000 ¢ 
5120000001 
$130000002 « 


5149000003 
37621 


37734 


5160000004 
$170000005 C 
5100000015 


7100000022 
0110000010 


0300000000 


x 


ANSWER 


OPERANO 
START 


Apo 


ENOIOLK 
suet 


COPPASS 3,4-444, 


IOENT ~0C7600 


MACHINE 6 

ENTRY START 

EAT ERRMSGI PERRHSG] 
USE JANSWERS 

Anss2 16 

USE 0 . 

DATA 0203040506078 
DATA 0 

Sad aoo 

Sx0 0 

IFCP6 & 

WE LALOCKT 

RJ ERRMSG) 

RE LbLOCK) 

Rg €HRMSG2 

1FCP? 2 

€o 


400 
Sal OPERAND +0 
$A2 OPERANDS} 
SA) OPERANDe2 


SAG OPERANC 63 
1X6 Kbex2 
1x? K3OKG 


SA6 ANSWER*O 
SA? ANSWERS} 
SA1 OPERAND+& 
SA2 OPERAND +S 
Say OPERAND +6 


SAG OPERAND?O? 
1x6 Mbox? 

1x? KBOKS 
SA6 ANSWER? 
Sal ANSWERe3 
$ao apo 
ah EMEOSKI 
1FCP6 \ 
RE LHLOCK2 

J ERRMSG? 
ENOLF 

IfFcPT 3} 
Ry aoo 
toc aod 
DATA 0 


Sat OPERAND?0 
SA2 OPERANDe1 
SAJ OPERAND 62 
SAG OPERAND +3 


1X6 x2-X1 
aa? KING ‘ 
SA6 ANSWER CG 
Sar ANSWER?S 
Sao aoo 
$x%0 LULOCKI ¢LALOCK2 
1FCP6 2 
RE LULOCK) 
Ry ERRMSG? 


O2/22777 9 06e32 126 


PAGE 


6T~-OT 


Pre Pr errr 


PF PF Fer 


21 


22 


23 


ra) 


2s 
26 


0100000015 « 


00000000000000000000 
S}10000000 « 
Si2000000) 
S$i30000002 © 
5149000003 
42612 
a2738 
5160000006 
SlTo000007 Cc 
S$loo0000ls 
7100000032 


“O1O000012 


0100000000 
100000015 . 


00000000000000000000 
$110000000 ¢« 
512000000) 
$130000002 » 
5140000003 
2710) ° 
27202 
24108 
24202 
6462) 
21303 
27404 
24303 
24406 
eatay 


5160000010 


Si700000I8 € 
26666 
26777 
22666 
22777 


5160000012 
$370000019 C 
0400000010 « 

b2 
jo 
lo 
‘V2 
44 
le 
lo 


472008 cM 


END20LK 
MULT 


Eno3erk 


DIVIDE. 


ENOSBLA 
COLOCK) 
LOLOCK2 
LALOCK3 
LBLOCKS 
LOLOCKT 
MAXOLK 


HINBLK 


* 


IFCP? 
Ry 
Loc 
DATA 
SAL. 
$a2 


-$AQ 


SAG 


1X6 
1x7 


STORAGE USED 


FODEL 74. ASSEMBLY 


COMPASS 39,4444, 


i 
A00 

Avo 

9 
OPERANDeg 
OPERAND>) 
OPERANDe2 
OPERANDS) 
nleK2 
XING 
ANSWER C6 
ANSWERS? 
aoo 
LBLOCK] -LOLOCK2+LELCCK) 


N 


- LOLOCKS 


ERANSG? 

1 

aoo 

AOU 

0 
OPERANDSO 
OPERAND?) 
OPERANDs? 
OPERANDs3 
x1 : 


Ke 


xl 
x2 7 

Keen 

x) 

x4 

xj 

xG 

Mart} 

ANSWERS 

ANSWER?9 

X6eN6 

X007 

AGOet6 

XTeH? 

ANSWER CIO 

ANSWER OE] 

START 

ENDIBLK~ANDe} 

ENO2HLK-SuAte} 

ENDIOLK-MULT oO} 

ENOSBLK-DIVIDEs} 

LULOCKE +L BLOCK2 LELCCKIoLBLOCK4 
LBLOCKT LOLOCK2 LOLCCKILBLOCKS 
LBLOCK) eLULOCK2 LOLECK3LBLOCKA 


; 114 STATEPENTS 
0.3957 SECCADS 


UZ/22779 06631 e126 


20 SYMBOLS 
99 REFEREKCES 


b. 


t0C 7600 COMPASS J.4-hbae O2/22/77 06.31.1226 PAGE 4 
SYPBOLIC REFERENCE TABLE. 
apo. is PROGRAMS 2/10 2719 L 2742 2/83 3/0) 3719 3745 
; 2/18 2/35 2/4) 3702 sil 3720 
ANSWER 0 ANSWER 2706 L 2/26 $ 2/34 § 2782 § 3/12 $ 3/37 $ 3743 $ 
2725 5. 2/393 § 2/51 $ 3vii s 3436 $ 3/42 § ? 
CIVIOE 1s PROGHAKHe Bv2r_e 3748 . \ 
EKCIBLK 26 PROGRAMS 2/42 t 3/45 
ERC 2A KH 24. PROCRAMe 3vo2 t 3/46 
CRCIICK 24 PROGRAMe Wig 3/47 
EKCGBLK 26 PROGRAMe VW4a'e 3/68 
EPRYSG] 0 EXTERNAL e 2704 X 2si4 
ERKRYSG2 0 EATERNALS 2704 X 2716 2/39 2/57 awit 
LeLCCKT ry’ 2/43 3749 O 
tbicCry 12 2s15 2/36 2/54 3st4 3745 O 3749 3750 3/51 
LULCCK2 10 2/38 2/54 3/146 3746 0 39749 3750 3/521 
tecocKy 10 - 2756 3/14 3/47 O 249 . 3750 
LBLOCKs le RA 374a 0 3749 3/60 
ia KAIHLA 2 3/50 O 
Oo wTAALK 10 3/51 0 
1 ruLT 5 PROGRAMS 3/04 & 3/47 
S CFERAKO 0 PROGRAHe 2708 & 272i 2/28 2745 2748 3/07 3723 
2/19 2/22 2/29 2746 3705 3708 3424. 
2720 2727 2/30 2747 3706 ‘3722 3725 
staat 10 PROGRAMe 2/0) € 2709 L 3744 
suet 15. PROGRAHe 2744 L 3/46 
HFS NCS/BE 3.2 R&AIA/RIB O2/02/77 | 
06031.-06eCOKO003E FRON “ALE 
06.3}.0¢.1P 00000832 WORDS ~ FILE INPUT « OC 04 


06.5}.06.CON, VOLAC0904 oe TIGTIOOASMILLER 

06.3} 607 .F INSA=0, ; 
O63, e282 2647 CP SECOKDS COMPILATION TIME 

06.3) 612.PAPOPART. 

Obs eh2EXET. 

O6eTLei2eCP 00001408 MORDS = FILE OUTPLT « OC 40 


06.)).12.F5 3584 WORGS ¢ 14336 FAX USED! 
06.31.12.,CPA oth? SEC, oli? Ady, 
06.31¢12.CPH vol sec, 2003 AOS, 
06-3112 ,10 12970 SEC. 1.990 ADJ. 
Go.31012.Cr 56,249 KWSe 3.921 ADS, 
06.3109205S 6.000 

6:3} ecPP 7.119 SEC. DATE 02/22/77 


O6.I1.12.E4 


EN" OF JOU, LE 


Lesson ll 


SUBROUTINES 
Lesson PREVIEW: 
THIS SECTION COVERS SUBROUTINE STRUCTURE AND THE VARIOUS 
WAYS OF PASSING INFORMATION OR PARAMETERS BETWEEN MAIN 
PROGRAM AND THE SUBROUTINE. INCLUDING BLANK AND LABELLED 
COMMON, 
REFERENCES: 


CHAPTER 3 COMPASS REFERENCE MANUAL #60492600 


‘TRAINING Arps: 


Visual Set V11 
PROGRAM LISTINGS FROM EXAMPLE DECKs SA, 9B 


PRovectT: 
PROGRAMMING PROJECT 5 
OBJECTIVES: 


AT THE COMPLETION OF THIS LESSON THE STUDENT WILL BE ABLE 
TO: 


i We ite A MAIN PROGRAM THAT CALLS A SUBROUTINE USING 
RETURN JUMP INSTRUCTION, 

2. CorRECTLY seT up COMMON BLocK FOR USE BY THE 
VARIOUS ROUTINES. 

3, Catt a COMPASS rouTiNe FROM FORTRAN EXTENDED, 

4, Cart a FORTRAN ExTENDED ROUTINE FROM COMPASS, 


11-1 


PARAMETERS 
3 WAYS TO PASS PARAMETERS: 
In REGISTERS 
In Common Biocks 
By PARAMETER Pickup METHOD 


(THIS METHOD IS NORMALLY USED FOR 
LIBRARY SUBROUTINES) 


11-2 


| | 
| 
a 


Heme eeee eee eee eee ee 


COMMON 
COMMON BLANK COMMON LABELED COMMON RA 
HISTORY ORIGINALLY BLANK COMMON . | RA+101B 
WAS DESIGNED AS THE ONE LABELED 
AREA FOR COMMUNICATION —— | COMMON 
BETWEEN SUBPROGRAMS,... 7 
| | AS MANY SUBROUTINES WERE e 
DEVELOPED BY DIFFERENT 
PROGRAMMERS. IT BECAME 
NECESSARY TO SET UP SEVERAL 
DIFFERENT BLOCKS FOR COMMUNI- LABELED 
CATION BETWEEN THE DIFFERENT 4 COMMON 
2 SUBPROGRAMS. THESE BLOCKS FOR C 
ie WERE GIVEN LABELS TO IDENTIFY 
= WHICH BLOCK WAS TO BE-USED BY 
WHICH SUBROUTINE, 
. BLANK 
Loap ‘BLANK COMMON IS TYPICAL- LABELED COMMON BLOCKS COME | COMMON 
LocATION LY LOCATED AT THE END OF AT THE BEGINNING OF THE LOAD ~~ RAFFL 
THE LOAD AND HENCE “AND THUS 
PreseTTING No PRESETTING, I.E., ALL CAN BE PRESET, I.E«,» THE 
INFORMATION MUST BE PUT PROGRAMMER CAN STORE INSTRUC- 
INTO BLANK COMMON AT TIONS AND DATA IN LABELED 
EXECUTION TIME, COMMON BLOCKS AND THESE 


AREAS WILL BE SET UP AT 
LOAD TIME. 


CL ENK AGE ; 
STORAGE ALLOCATION, 
ANORESS 
0 
Ww 


v-TT 


LENGTH 
WwW 


COMPASS 3.5-470, 


AINARY CONTROL CARDS. 


1OENT LUNKAGE 


END START 
ALOcKs TYPE ADORESS LENGTH 
PROGRAN® LOCAL o | 36 
LETERALS® LOCAL ¥6 3 
OATa LOCAL al 36 
DATA *COMMON 0 24 ° 
uw ¢ COMMON 0 12 


ENTRY POINTS. 


START oe eur a4 


EXTERNAL SVYHAOLS. 
sunt 4SG*" SYS= 


07714778 


12.43.36. 


EransGi 


PAGE 


tSe 


LINKace COHPASS 3.5-490, OMstasTA 12.69.96. PAGE 


TOFNT LINKAGE 
ENTAY STARS BUF eERRHSGI 


LCUst 4 
COMMENT THIS EXAMPLE SHOWS THE LINKAGE RETWEEN PROGRAM BLOCKS 
ExT sunt 
0 46000 “3 “$TaRt = ONO 
1 7160000010 ¢@ Sk 10A Data 
_ §8An0000246 « : S46 nuF STORE 4Y 
: 36 LTAG cit Pooh LITERAL 
2 $810000037 « SAt LTaGel GFT 2ND CETERAL 
tore Ax? ni MOVE TO XT 
3. 5170000025 + Sat NUF eo} . STORE LEVERAL 
$10000005) « Sao NATA0) STARTING SeCoM. ADORESS 
& Tho0enn0000 C $xo0 NATALO L.C.H. STARTING ADDRESS 
§ 0120000012 - WE 10 MOVE. DATA FROM $.C.M, LOCAL TO LeC.M. LABELLED COMM 
0100000015 « AS . FARMSGI . 
6 0400000000 x o Ry SUAl ,60 To sual 
Y $200000041 « $Aa0 NATAD2 5.C.M. STARTING ADDRESS 
Pid0go00r2 C $x0 MATAOL L.C.M. STARTING ADONESS 
10 «0920000082 WE 0 ; MOVE DATA FROM S.CeoH, LOCAL BLOCK 10 L.C.M. LOCAL 
0100000015 « ay FRAMSGI 
1! St00000065 « ° $a0 NATAOS S.C.M. STARTING ADDRESS 
Vio00000000 C Sx0 NAaATAs L.C.M. STARTING ADDRESS 
= 12 0120000082 WE 10 HOVE DATA FROM S.C.M,. LOCAL 10 LC... ALANK COMMON 
! 0100000015 « QJ FARHSGI ' 
ul i) ° ENNRUN 
1) 71402470215 SK6 JREND*G >? ; ENDRUN .! 
20650 Ln6 400 EnnpRuUN Dd 
16 0100000000 x ARI =KSYSe FNDRUN ot 
FNAM ENDRUN oD 
15 00600000000000000009 - ERRMSG] DATA U] GIVE ERROR MESSAGE : 
16 MESSAGE HESSAGE o RECALL 
16 THLOONDOZE « : SKID MESSAGE ze MESSAGE ol 
43652 MX6 42N MESSAGE 1 
15116 AA) -KOen) MESSAGE 21 
0 @eSCP=ERC SET O : MESSAGE ol 
1FC NEo RECALL ef MESSAGE 03 
200000 *eSCP=RC SET 200000 MESSAGE of 
: {F -REGooT? MESSAGE of 
i #eSCP=OP SET JI MFSSAGE ot 
IF DEF oe! : MFSSaGE wt 
0 = esSCPzoOP SET : : MESSAGE 2D 
1FC EQe8SiNCaLt,t MESSAGE .1 
#eSCP=oOP SFT dD MESSAGE 28 
Az NOeeseSCP=ZRCeesGCP=NP . . MESSAGE 21 
17) =T1AH0?n0000 SNA @4SCPERC eC 0 OSCPEOP MESSAGE 21 
; suie 7 MESSAGE 2D 
TFC ED BOKIS 61 MESSAGE ot 
SHIP 4 MESSAGE 2) 
TEC FOcSEKAGeD MESSAGE oD 
& FRR OPTION IN KE OW KG SONDRED MFSSaGE 1 
A= RHO tSSCPIANC HFSSAGE 2! 
Ce Loe ‘ : MESSAGE 21 
Ne Whee sSCPENCe 7 MESSAGE 61 
Otonn00nnD x A) =NKSGe . MESSAGE od 
7 MESSAGE ot 


EnnM 


LINKAGE ; ‘COMPASS 3.5-470, OP/14/78 = 12.63,16. PAGE 3 
DATA 


USF Nata 
4&1 0000000000000000000) parTao2 OATA Bebo e be Fee 3e 3.00% 04.00505.0 
42. 17204000000000000000 
43 00000000000000000002 
4&4 17214000000000000000 
45 00000000000000000003 
46 17216000000000000000 
47? 00000000000000000004 
SO 17224n00000000000000 
S$} 00000000000000000005 
52 17225000000000000000 
53 00000000000000000144 OaTao3d CON 100 52000 30054000500 0600» 70026600 .90001000 
Se 00000000000000000310 
55 00000000000000000454 
S56 00000000000000000K20 
ST 00000000000000000764 
60 00000000000000001330 
6) 00000000000000001274 
62 000000000000000018440 
6) 00000000000000001604% 
64 00000000000000001750 . ; 
"65 0000000000000000000! DATA04 CON PRA IRHSIRC, IRD ARE SIRF SIRGOAAHAIRTSIRY 
66 00000000000000000002 
67F 00000000000000000003 
00000000000000000004 
TL 00000000000000000005 
72 + 00000000000000000006 
13 00000000000000000007 
%% 00000000000000000010 
71S 00000000000000000011 
76 00000000000000000012 


JEL 
~ 
o 


USELCH /DATA/ 


6 12 Oataso ass 10 
le 12 Dataol BSS 4a 
USELCH 7/7 
6 12 DATAG ass 10 
USE 0 
2) 5505570357235 715S2722 MESSAGE DIS of E.C.S- WAITE ERROR OCCURRED/ 


22 $)240555052222172255 

23. 17020925222205040000 

24 12 BUF assz 40 BUFFER FOR PROGRAN 
DEFAULT SYMBOLS OFFINEO By COMPASS. 


ox | $YSe 
Or HSGe 


CONTENT OF LITERALS ALOCK, 


36 00000000000000N000002 a 
JT =00000000000000000004 0 
40 00000000000000000006 F 
W Eno START 


L~TT 


U TeX aGE 
SYMBOLIC REFEREN 
nur 24 
DaTAo} V2 
Oatao2 al 
Datao)s §) 
Dataos. 65 
oaralo 0 
DaTae o 
FRAMSGO) 15 
L1aG 16 
MESSAGE ai 
S68 6 
Start Q 
Supt 0 
S’YSs ~ t) 


CE TABLE. 


PROGRAM 
DATA 

PROGRAM® 
PANGRAN® 
PROGRAKME 


. DATA 


4t 
PROGRAHe 
PpaoGcaane 
PROGRAN® 
ERTERNAL® 
PRNGRAN® 
EXTERNAL ES 
EXTERNAL® 


2702 
2719 
2716 


27th): 


2722 
274 
2723 
2702 


' 2709 


273) 
2755 
2702 
2705 


2729 


270A 
3736 
370? 
341? 


3422 


yur 
Wa 
2716 
aston 
3798 


2704 
2/1 


COMPASS 3.5-470. 


evl2 $ 


were 


2725 


27L 


07714778 


2/5? 


2.43.3. 


PAGE 


& 


suat — COHPASS 365-670, OT/14/78 12.43,36. PAGE 1 
STORAGE ALLOCATION, 


ANDRESS LENGTH BINARY CONTROL CARNS. 
C) “3 1DOeNT suri 
3 ENO 
A@LOCKS TYPE ADORESS LENGTH 
PROGRAH® LOCAL e 31 
a _ COHMON 6 § 
MATA . COMMON 0 246 
DATA ¢COHHON C) 12 
4/ @#COHHON 0 36 
ENTRY POINTS. 
sus : oe 
EXTERNAL S$VMAOLS. 
eur SGe $ue2 €RRMSGI 
suat COMPASS 3.5-476, . O7714/78° 12.43.36. PAGE ? 
{MENT <UA 
Ext aur 
i ENTAY SUA) 
@ 00000000000000000000 sual - DATA 0 RETURN ANDRESS STOREN HERE. 
1 7960000006 Sk6 rs Oata 
5160000002 x San nure2 STORE IT 
2 St00000017 « $a0 AUFFER S.C.M. STARTING ADDRESS 
7100000000 C Sxo DATA® L.C.mM. STARTING ADORESS 
3 O1fO000012 RE 10 TRANSFER 10 WORDS FROM LOCH 10 SCH 
0100000010 « RJ FRRMSG2 : ; . 
4 Fi000000I2 C€ ) So Matas ~ L.C.M. STARTING ADDRESS 
5 O120000012 WE 40 TAANSFER 10 WORDS FROM S.CoMe TO LeCeM. BLANK COMNN 
0100000000 x RJ eXFRRMSGE GIVE EPROR HESSAGE 
6 Of000N0000 x ° Uh) wXSUR2 GO 10 SUR2 
7 0400000000 « €0 sual ExIT FROM THIS SUBROUTINE 
10 00000000000000000006 ERANSG2 OATA 0 
fl TFaboooo0ns « MESSAGE RFADHSG. RECALL GIVE ERROR MESSAGE 
$3 0400000010 « : ta FRRMSG2 RrTunn to Carccer 
14 $505570357235 1552205 READHSG OTS 04 EeC.Se READ ERROR OCCURRED 
Ww 12 BUFFER RSS 10 ; 
USE ‘ZA USE @LANK CONHON 
6 § ors SS § 
USE sDATAS USE LABELED CoMNon 
0 5 DATA ASS 5 
5 7 guFF2 @SsS 15 
. USFLCH /DATA/S 
0 12 -DATAQ ASS 10 
USELCH 77 
0 12 Data? fSS 10 
12 24 DATAs QS5 20 
30 FND 
TOO LCH 4676008 SCM STORAGE USED £9 STATEMENTS 16 SYMADLS 
MODTL 374 ASSFHAL Y 0.06) SECONDS 23 REFERENCES 


SUART2 COMPASS 3.5-4 | 
STORAGE ALLOCATION. | SS 3.5-470, OF714776 $2.43.966 PAGE } 
ADDRESS = LENGTH BINARY CONTROL CARDS, 
0 3 JOENT = suART2 
3 . END 
BLOCKS TYPE ADDRESS LENGTH 
PROGRAM® LOCAL 0 3 
4s COMMON 0 je 
Data COMMON 0 26 
DATA2 COMMON 0 12 
ENTRY POINTS, 
sus20 ne 
‘ EXTERNAL SYMAOLS. 
eur 
ie ; 
od 
i] 
oO 
SUBAT2 COMPASS 3.5-670. O7724/7B8 12.630 Ihe PAGE 2 
1OFNT sSUART? 
ENTRY SUR2 
‘ USE 4s USE BLAN« COMMON 
0 12 BUFFS ASS 10 
: USF n GO BACK 10 ZERO ALOCK 
0 00000n00000000000000 SuB2 DATA 0 
1 72600000046 SH6 4 DATA 
$140000003 x SAG _ eKRUF 3 STORE DATA : 
2 0400000000 « fo sua? EXIT FROM THES SUAROUTINE 
USF /DATAS USE LABELED COMMON 
0 5 - DUMMY ass 5 OumMMy OVFR 
5 5 puFF2 ASS s USED IN SUBRT2 
12 t2 AUFFS 8S5 10 
USE sO0ATA2s USE LABELFD COMMON 
0 te. RUFF ASS yo 
3 €NO 
1100A LCM 46500 SCM STORAGE USED 16 STATEMENTS 7? SYMBOLS 


MODEL 174 ASSEMALY 0.017 SECONOS 9 REFERENCES 


LOAD HAP = | INKAGE CVBER LOADER 1.4-470 OP71G778 12.63.36. PAGE ] 


‘ FWA OF THE (OAD tot 
Lwael OF THE LOAD - 35% 
ECS FwAa 0 
ECS LwAct 70 ; ; 
TRANSFER ADDRESS -= START faa 
PROGRAM ENTRY POINTS -~ LINKAGE gna 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADDRESS LENGTH FILE pate PROCSSA VER LEVEL HARDWARE COMMENTS 
LINKAGE 1) 7? ~~=—s LO 07/14/78 COMPASS 3.5 470 THIS EXAMPLE SHOWS THE LINKAGE BETWEEN PROGRAN 
7OATAS 210 24 
sust 2 vn 160 07/14/78 COMPASS 3.5 470 
/OATA27 265 12 
SUBRT2 27 3 iGo 07/14/78 COMPASS 3.5 470 
ae SY¥S.RM 302 40 SL~SYSLIB 06/09/78 COMPASS 3.5 4%70- PROCESS SYSTEM REQUEST, 
ro 4s 342 2 
' 70ATAS 40000000 30 
at 7] 40000030 ry) 
2030 CP SECONDS 132008 CM STORAGE USED 1 TABLE MOVE 


DusP RELATIVE ; DMP ohdDe 337. 
COLE 46000 46000 61000 46000 71600 00010 51600 00195 51100 00150 JOTI 46000 
oolks S17?00 00136 51000 00164 71000 00000 61000 *6000 01200 00032 01000 00126 01000 00234 61000 44000 — 
00120 $1000 00152 71000 00012 01200 00012 01000 00126 51000 00176 71000 00030 01200 00012 01000 00126 
oolz2s 78602 47021 20650 46000 01000 00304 #1000 46000 00000 00000 00000 00000 71100 00132 43652 15116 
00130. 719602 00000 01000 00333 94000 00126 41000 46000 55055 70387 29575 $2722 11240 $5505 22221 72255 
00134 17030 32522 22050 40000 00000 00000 00000 00010 00000 00000 00000 00004 00000 00000 00000 00006 
| 00140 00000 00000 00000 00004 00000 00000 900000 90000 00147¢n0000 00000 00000 90002 : 
00150 00000 00000 00000 00004 00000 00000 00000 00006 00000 00000 00000 0000! 17206 00000 00000 00000 
| 00154 — 00000 00000 00000 o0002 17214 00000 00000 00000 00000 00000 00000 09003 17216 @0000 00000 00000 
00160 90000 00000 00000 00004 17224 00000 29000 00000 00000 00008 00000 On005 17225 @0000 00000 coo0e 
00164 00000 00000 00000 00144 | 00000 00000 00000 00310 00000 00008 00000 00454 90000 00000 00000 00620 
00170 00000 00000 o0000 00764 00008 00000 90000 01130 00000 00000 00000 01274 90000 00000 o000 01440 
00174 60000 00000 co00e 01604 00000 00000 00000 01750 00000 00000 00000 0000! 00000 00000 60000 0002 
Fa 00200 00006 00000 00000 00003 00000 00000 00000 00004 00000 00000 00000 00005 00000 00000 00000 00006 
= 00204 00000 00000 60000 00007 00000 00000 00000 00010 00000 00008 00000 000)! 00000 00000 0000 onol2. 
©0210 60000 00000 04008 60210 00234>04000 00120 00000. 00000 71600 00006 $1600 00197 51000 00253 71000 00000 
00297 03100 C00t2 01000 00244 . . | a 5 nl 
00240 71000 00042 61000 46000 01200 00012 01000 00126 01000 00277 61000 46000 04000 €0234 61000 46000 - 
00244 00000 00000 00000 00000 71100 00250 43652 15116 =: 71602 00000 01000 00333 04000 00244 61000 46000 
00250 $5055 70357 23575 52208 01045 SoS22 22172 25517 03032 S2222 05040 on000 00000 00000 d0000 00144 
00258 00000 00000 00000 00310 "90000 00000 00000 00456 0000 00008 00000 00620 00000 00000 00000 00764 
00266 00000 00000 00000 01130 00000 00000 00000 01276 00000 00000 00000 01440 00000 00000 00000 01604 
00264 00008 00000 00000 01750  —=»-»-»s 60000-00000 04004 00245 0027704000 00243 90000 00000 
00300 73608 00n04 51600 00140 04000 00277 61000 46000 04000 00315 00000 00000 01300 00000 s0000 00000 
00304 04000 00126 00000 00000 $1100 00001 03110 00305 54610 04000 00303 46000 $1100 00066 03310 00921 
00310 $1100. 00302 04000 00712  PEL00 00130 70160 46000 13661 13161 13661 46000 51600 00303 1061! 46000 
00314 Sil00 00001 03000 00302 20652 01000 (00304 46000 51100 @0001 032330 00316 04004 OndIT 61000 46000 
00320 $8100 00001 03110 00317 71602 20316 04000 00315 20150 36661 01000 00304 04004 0032) 61000. 46000 
00324 71602 20994 20652 36662 53160 20173 03310 00323 03010 00323 $1100 00001 03110 00325 71100 00001 
00330 04000 00322 61000 66000 71603 24616 1266) 2065) 01000 00304 41000 46000 04004 00333 #1000 46000 


ee ee toe 


ANS TIAAN AHAIN 871429 Pricin DATA ABFA AADZIE AAIED A) oY eo ee ee Pry Sie ate 


ECS DUMP ARGUMENTS ARE 


0000000 
0000004 
0000010 
0000014 
0000020 
0000024 
0000030 
0000034 
0000040 
0000044 
0000050 
0000054 
0000060 
0000064 
@000070 
0000074 
Oo0010e 
o000104 


eT-1IT 


00000000000090000144 
00000000000000000764% 
00000000000000001604 
06000000000000000002 
00000000000000000004% 
600000000004000000248 
00000000000000000001 
00000000000000000005 
000000000000000000)1 
00000000000000000454 
00000000000000001274 
60000000000400000054 
60000000000400000060 
60000000000400000064% 
60000000000400000070 
60000000000400000074 
60000000000400000100 
60000000000400000104 


FuAs0000000R LwAs00001008 


00000000000000000310 
00000000000000001110 
00000000000000001 750 
17214000000000000000 
1722400000000000N0N0 
606000000000400000025 
00000000000000000002 
00000000000000000006 
00000000000000000082 
00000000000000000620 
00000000000000001440 
60000000000400000055 
60000000000400000041 
60000000000400000065 
6000000000NSOODNNOTI 
6000000000040000007S 
60000000000400000%08 
60000000000400000105 


Diag 


12.43.34 ..ONDORY 
12.43234.,5P 


Type =008 


00000000000000000454 
00000000000000001274 
00000000000000000001 
00000000000000000003 
00000000000000000005 
60000000000400000026 
00000000000000000003 
000000000N0000000007 
000000000000000003 4% 
00000000000000000764 
09000000000000001604 
60000000000400000056 
60000000000400000062 
60000000000400000066 
60000000000400000072 
60000000000400000076 
60000000000400000102 
60000000000400000106 


CYA175-SH1 
FROM 
00009640 WORDS 


NA2- 


ECS Ft=00010008 


00000000000000000620 
00000000000000001440 
17204000000000000000 
17216000000000000000 
17225000000000000000 
60000000000400000027 
00000000000000000004 
00000000000000000010 
000000000000000003130 
0000000000000000)330 
00000000000000001750 
6000000000040000005? 
60000000000400000063 
60000000000400000067? 
60000000000400000073 
60000000000400000077 
60000000000400000303 
60000000000400000107 


5201/R68 04/07/76 
7SH 


- FILE INPUT « DC 04 


12,439.34. NONSECH, PSH0027THs TACTORIAMILLER 
12.43.35. COMPASS, 
$2,463.36, ASSEMBLY COMPLETE. 


12.43.36, 


0.26% cPU SEC. 


b2.43.36,L60,. 
§2.43.36,0HP otd1 6337,” 
12.43.37. OMPECS 202100, 


$2.43.37, 


stop 01 


12.63.37 EMIT. 


12.43.37.,0P 
12,63,37.,MS 
12.43.37,CPA 
12.43.37.10 
§2.43.37,CH 
12,.43.37.FC 


3584 woROS 
0330 SEC. 
0785 SEC. 

15.997 KwS. 
2565 KWS. 


12.43.37.558 


12.43.37.PpP 


2.914 SEC. 


12.43.37.FJ END OF JOBe SH 


00003200 WORDS - FILE OUTPUT 


476008 SCM 
11008 LCN 


USED. 
USED. 


e Oc 40 
USED) 
ADJ. 
ADJ« 
ADJ. 
ADJ. 


‘ 1O7TS2 Max 
2330 

785 

0976 

0017 

2.108 

DATE 07714778 


CM £7. 20165008 


00s: 
oRSt 


PAGE NO. 


cu 
tm 
o/ 


8U 
18 
Fr 


90 
10 
TT) 
10 
60 
10 
0 


COD 808 108 Des tee N88 bee 


FP 
Ls 


ew 
60 
on 
cn 
i" 
os 
Be 
i) 
fa 
i» 
in) 
ac 
AG 


. } > ; 7 
: . q 


| sr 8 ; 
ie = 


* 


TRUNCOM COMPASS 3.5-470, 06779778 16.20.46). PAGE 4 
STORAGE ALLOCATION. . 
ANORESS LENGTH BINANY COHMTHOL CARDS. 
0 2 1OFNE = FRUNCOM 
? END THUNCOM 
BLOCKS TYPE ADDRESS LENGTH 
PROGRAM® LOCAL -' 90 2 
ALOCK COMMUN 0 1? 


FNTRY POINTS. 


TAUNCOM ne 


EXTERNAL SYMAOLS. 


SYSe 
TRUNCOM COMPASS 3.57470, OAS2T/IAR 16.20.41. PAGE 2 
kr , i 
bh 
1 TNDENT = TRUNCOM ; 
a ENTRY TRUNCOM 
[es ‘ : 
° FIRST PROGRAM NECLARES 10 WORDS IN /BLOCK 
- é 
; USE sBLOCK USE LARELLED COMMON 
0 i2 bur assz 10 RESERVE $0 WORDS OF FEROS . 
USE 9 . , 4 
0 46000 . TRUNCOM NO ; ; 
7160267021 ENDRUN 
2 ; . END TRUNCON 
604008 SCM STORAGE USFD ; Ue STATEMENTS a SYMROLS 
"1s MODEL 274 ASSEMBLY 0.0925 SECONDS & REFERENCES 
: TRUNCOM COMPASS 3.5-470,. 06727778 16.20.4106 PAGE . 3 
SYMBOLIC REFERENCE TARLE. : 
Gur 0 ALOCK e707 
SYSe 0 FXTERNAL® evil 


TRUNCOM 0 PROGRAM®e 2702 € 2709 l 


TAUNCIT 
STORAGE ALLOCATION. 


anDRESs LENGTH 


COMPASS 1.5-470, Uo/27/78 16.20.42. 


HINAHY CONTHOL CARDS. 


1OENT = THUNCTT 


0 0 
0 : €Nn 
+ HLOCKS TYPE ADDRESS LENGTH 
ALOCK COMMON 0 24 
ENTRY POINTS. 
eur ne/RLOCKs: 
TAUNC IT COMPASS 3.5-470, 0672777A 16.20.4626 
ps TOFNS = «FRUNCET 
be FNIRY ALE 
t e 
He i ~ 
ie ° SECOND PRNGHAM DFCLARES 20 WORDS IN /BLOCKs 
: use 7PLOCKS USF LSRFLED COMMON 
0 24 Lits ASY7 0 
0 FNY 
47300A SC% STORAGE USED a STATEMFHTS 1 SYMROLS 
MODEL 176 ASSFMAL YY 0.010 SECONDS ? REFERENCES 
TRUNcit COMPASS 3.5-470, OA727778 16.20.42. 


SYMBOLIC REFERENCE TAALE. 


6uUF Q AL OCK 


2702 € esore 


‘ 
cy 


PAGE 


PAGE 


PAGE 


? 


‘LOAD MAP = TRUNCOM CVHER LOADEM $.5-470 04729778 16.20.43, PAGE 1 
FWA OF THE (OAD on 

LwAck OF THE LOAD 175 

TRANSFER ADDRESS -- TRUNCOM 123 


PROGRAM ENTRY POINTS -- TRUNCOM 12) 


@e0eeee6e ERROR SUMMARY 
WESLOD///CORMON ALOCK REDEFINITION = ALOCK 


LAST PHOGRAM READ ~ TRUNCIT 
LAST FILE ACCESSED- LGO 


PROGRAM AND BLOCK ASSIGNMENTS, 


BLocK ADDRESS LENGTH FILE DATE ——«~PHOCSSR VER LEVEL HARDWARE COMMENTS 
/BLOCKs TT) 12 . 
TRUNCOM $2) 2 tsco 04/27/7786 CUMPASS 3.5 470 
ht TRUNC IT 125 10 Loo ; 06/27/7786 COMPASS 93.5 470 : 
e Sv¥S.AM 135 40 SL-SYSLIB 05/16/78 COMPASS 3.5 4706 PROCESS SV¥STENM REQUEST. 


od 000000 Ae 600700 AO o00n00 : 
AA 220200 At 000001 Bt 00001 CiAlde 900 Conn 0000 oOn0 oonA CIAtbe@ 900 0One 9000 0000 or00 


FL 000300 a2 000060 R2 000n02 Ctaete 315095 1520 0000 000 O06] CiR2he n0ne HOnO0 OHA ONO 0000 
€*% roor00 a3 000057 A O82799. CtAJd=s 0000 gnnn 0000 000 Onno. CIAIea 
RE 000045 4% Q00001 Fe 0007303 Ctasde Annono vong OVNO HONDO ONAN Citape 


FE C0000 AS 000123 AS 00012) CtaSbe 000 vano ovo Avn0§ ooONn C(AS)2 0700 0000 000 0000 onn0 
“A 000400 46 000001 86 000300 Clasp 0000 voon avod cond nooo CiAHbe | 
ay goon0l AF 027756 Ctaty=s nn00 vonn 0000 o00n0 o0n0 CIRT)s 
R@ 0000 0000 0000 0000 0000 . : 
Al = 0000 0000 0000 0000 oa0009 
x2 1505 1520 0000 000 006) 
23 0000 0000 0000 000 0000 
4 0000 0000 0000 Oo00 0000 
"S$ 6000 0000 0004 0040 0000 F 
6 31505 $8520 0000 o000 006) ; 
x? 0000 ©6000 0000 0000 0000 : ‘ ; . . 4 


€0000 00000 00123 ontoo 00000 00000 0000 00000 00000 
00054 456110 03810 00058 54710 St100 00001 03110 00055 44550 02550 00000 44000 00000 00000 on000 00000 
00060 15051 52000 o0000 0006) 00090 00300 n0n0U Onno} 07060 00060 61600 o0005 04000 00063 00000 nn02) 
0006% 84071 70000 00000 00000 : 00000 On000 nOn00 00175 40000 00000 02000 oot) 00000 00000 40000 oonne 
00076 84071 75755 00000 00000 00000 00000 00000 00000 Rot 

00100 #54000 00000 01000 O0001 

00100 $4000 Gno00 O1000 CO00! 00088 40900 n0000 00175 00000 00000 00000 onn00 

0010% #00000 00000 0000 00375 00000 00000 oonn0 00000 

OONLO #24222 SiA03 17150 00129 00000 00000 nonov onono ’ 

00126 #00000 00137 On0n0 o0000 00000 00000 n0000 On0n0 00135454110 20123 03310 00136 04000 00142 41000 44000 


ooun 04006 00137 HIOND &An00 


“rr NR2- CYALTS-SNI 6LAT7H6H «057157798 


16.20.40.00N00K) FROM 7su 

16.20.40.1P 00000256 woros - FILE INPUT ¢ OC ns 
16.20.40.00N. PSNeO2MBeP2CTOLIACMILLER 
16.20.41 COMPASS. \ 

16.20.0426 ASSEMULY COMPLETE. 504008 SCM ustO. 
16.20.4206 0.093 CPU SECONDS ASSEMALY TIME. 
16.20.42.1G60. 

16.20.46). NON-FATAL LOANER ERRORS - SEE MAP 


16.20 ¢%3.ERROR HODE ©00. ADNRESS 20001823 
16,20.%).0P 00001216 wOHDS - FILE OUTPUT » OC 40 


16.20.04).4S5 ° 3584 woRvs ¢ 13608 Man USED) 
16.200%3.CPA 015) SEC. 0153 ADS. 
16.20.4).10 0645 SEC. 2645 ANI. 
16.20243.CH 10.589 eS. 2646 ADJ. 
16.20.43.55 1.445 

16.20.43,PP 2.915 SEC. DATE 06727778 


16.20.43,63 END OF JO0Be SH 


ST=TL 


' 
‘ 


Lnaneot : TOMPASS 1.5-670 DAsPP, TR 87.07.09 PAG 
STOUAGF ALLOCATION. cs vie GE ' 
APNA@ESS — LENRTH HINANY CUONTHOL CARN, ¢ 
a & ent roanenn 
6 , FNNn tari 
RLOCKS VyoF AUNAF SS LENGIM 
PROGDAMe® LOCAL 6 & 
Laecoum cov“oy a ? 


FNTRY POINTS, 


sSrant fe 


EXTERNAL SYMHOLS. 


SvSe 
Hy 
nS LOADED! , ; . COMPASS 3.5-470,. 06727778 17.02.63. PAGE ? 
~ . 
1OENT Losotol 
ENTRY sTaRt e 
SOHPOHHHHSSHOESHSSSSEHEETSEHHSECHOEEESOAOHSLOSHESHEEEHHOEHHHSHEREOSEHEHESESEOTOOES 
e “ ‘ ° 
e IMPROPEH USE OF LARELED COMMON e 
e _ e 
; SOSSSHSSSHSHSSSCHHRSESHEKHEOCSHOSHSSHHSSHSSHOHSHSHSOHRHESHSHEHKSSHOSHSKLSHHSOSEHHETEESSCEESSOECER 
0 00000000000000000001 STAQT DATA 12 
1 00000000000000000N002 
2 ENNRUN ; 
2 7160247021 SAG IRENDE4O) ENDRUN Dd 
20650 Lx6 400 ENDRUN 2) 
3. 0100000000 x RJ enSYSe ; ENDRUN oD 
FNDM ENORUN of * 
USE 7L ARCOMM?S 
O PITVTTTTVIITITIVITIIG DATA -be-e 
| RAPA RRRRER RARER RES 
USE a 
OEFAULT SYMROLS NFFINED HY COMPASS, 
OK SYSs 
6 , END start 


504008 SCM STORAGE USEO ‘1? STATEMENTS 2 SYMNOLS 
: MODEL 174 ASSEMALY 0.035 SECONDS 9 REFERENCES 


COMBALY B.5-8IN, ea TAL ee rae Bs PAGE ’ 


poanene 
SroNace SBLLOCATION, 
ArPRESS LENGIN AlNavy CONTHOL CaARNS, 
0 ? NONE guANnthe 
? . fNn 
ALOCKS Tyee ANNE SS LENGTH 
PANGEaAMe LOCAL a ? 
Lancoun CaMMON : a a] 
Loant ne CUMPASS 1.5470, Ons 297TH 37,02 .43- PACt ? 
POENE PF OanED? 
0 2NH0NI1DOHVNHDOHVOOOND 3 Oaia Vos 
1 o000NnHDNDHNNNDOUADS 
- USF 7LBRCOKRMS 
u) i] BSS ' 
a eR ARRERERER ERO RARE RL. nara -}ens 
! 2 Pevvvvereryvavvyrryys 
' be é €ND 
foe) 
&TINNA SCM STORAGE UStO : & STATEMENTS Qf SVMHNLS 
MODFL t7% ASSFHALY 0.001 SECONDS QO REFERENCES 


4 , \ é : 7 f 5 + 2 


bh J b || a ee J 


Loan Hao - coanent . CVI COANE | 4-a70 OAS2T/IA 97.07.65, PAGE i] 

Fwa OF THE (020 ot 

LwAct OF THE LOAD tol 

TRANSFER ADORESS -- $tant en th | | 


PROGRAM ENTAY POINTS ~- Loanron wna . : | 


eevseves® ERPOR SUMMARY 
NESRORZ//COMMON ALOCK REDEFINITION. @ Laacoun 


LAST PROGRAM READ - LOANEN2 
LAST FILE acCESsto- LGO 


PROGRAM AND ALOCK ASSIGNMENTS, 


BLOCK s0DRESS LenGctu FILE «° Oat€ PHOCSSR VER LEVEL HANNWARE . COMMENTS 


7t ABcoMNs whe _ 2 
Loaorol 113 ry Lsco 04/27778 COMPASS 3.5 470 
b Loaneo2 ; ba? 2 tco 04/27/78 COMPASS 3.5 &70 
a 5SYS.PM 120 40 SL-SYSLIB «= OSB 7A CUNPASS 3.5 670 PROCESS SYSTEM REQUEST. 
ul ; 
im 
2030 CP SECONNS 13200P CM STORAGE USED 1 TAALE NOVE 
t 
i 
t 
i 
‘ ’ 
Ounp EL ATIVE " NMOTLND DIM ; . 
TPVTT VVFPT PTE PTTTA TIVNT VIER vere VETTE T7779 VOVTT PPITP TPeERD 


oolnt ; 
onlls 0H00N OnNNH vanOD OHNne TIAN? STOEL 2NASY SANDO ntnno not2) 6h0n0 4000 QOONO 0000 Honor nn00? 


e 000000 40 900700 HO aaun0d 


Ra 31100 At HoonAt WI 00001 Ciatys fnaon venn unm 0000 0000 Cthti2s nnd oonuw O0nO 08n@ 000 
FL 000200 42 000n60 R2 000nn? Ctaeys 81505 152m HUHH VOHO HOH) Cttébs 0000 00n0 000H 0000 an00 
€4 700700 a3 000057 &) O12793 Ctadlb= 0900 vdnnH O80 NHHO OnHO Cth tba 
RE 00005) As O000n0h Ae 000701 Ctaste 9000 O00n OVNO NhOND HAAN ClHods 
FE 000000 AS 000413 AS 000319 CeaSbe Perey ofeyy Veee Fee OPP Ctngew pred Pvve IVP PIPe VIII 
MA 003000 86 000008 fH 000200 . €tahd=® 0900 whan aNnO0 HOHO HONH Cthnds 
‘ al oonanh AF 027756 Ctalys 0000 090% 0000 nnnd oon Ctulys 


£0 0000 0000 090 oVv0o nao00 
kb 0000 0000 noM0 0000 900n 
w2. 1505 1520 00H OVOD O00} 
n} 0000 0000 0000 o0v00 000 
M& 0000 0000 009 O0v00 0000 
RS 6000 0000 0004 Ous0 0000 
46 1505 1520 0000 ou00 006} 
uP 0000 0000 0000 000) 502) 


60000 00000 00194 vo000 00000 00000 09000 nfnov o1000 . 
00054 #56110 03110 00054 Ss7l0 51200 0n001 93110 00055 44550 02550 00000 46000 00000 00000 90000 00000 
00060 15051 S2900 voonn 0006) 00000 On200 nOnou ooon! 07040 00060 51600 onool 04000 0006) 00000 0002) 
00066 14078 70000 00000 00090 00000 00000 nonov one 40000 00000 92000 onitt 00000 00000 40000 onn00 
00070 05300 501925 24055 12324 01222 65255 00000 00000 00000 00000 00000. 00000 
00100 #54000 00000 v1000 0000! 
00800 «$4000 00000 01000 O00! 0000% 0n000 nonou ootA} 00006 00000 00000 on00e 
00106 400000 00000 vooon 00161 00000 00000 nv00U On000 
00810 #14170 30405 4340 00113 TIITT VIVID VIPGE VIG 27007 VVVVY VVTED TIPS PVVE VPP VIVIF VIIVE 

H* 9011s 00000 00000 voonn oonn2 71602 47021 20650 46000 01000 00123 61000 44000 00000 00000 00000 onood 

+ 90120 90000 aon00 00000 00004 Sella 2nbe3 03910 oOnt22 04000 00126 A100 &4000 040% 00123 61000 44000 

N cole. Siloo Gnool udlin o0426 54610 04000 nOj2¢ 46000 S1106 000466 03310 00130 Sib0o Col2t 04000 nntdh 

io) 00130 T1800 00330 20140 46000 1306) Pplol tinsel 44000 1600 00122 1061) «A000 $1100 0000) 01000 ontet 
00134 20652 01000 00123 4000 Si100 GoOot o3tiu 00135 N60us 00136 61000 446000 51100 00001 03110 00136 
00140 71602 20114 Us000 00434 20150 3Ond Olnow 0012) N6U04 001462 61000 46000 T1602 20384 20652 IA442 
O08ss  $39K0 20873 UIF10 00952 03030 Ont42 511400 O0nn) 03110 00146 7TIIOu o0002 04000 00141 61000 «A000 
00150 72603 24416 1264) 20651 01000 0012) alnov 46000 040046 00152 41000 4000 73660 20630 12161 71610 
0015s 2012) 039210 00150 2015) LPT 20656 S1600 00160 T4H60 6116 2012) snn00 04000 00150 61n00 4A000 
00160 00000 00000 00000 00000 ~ 60000 09000 04004 0006) 40000 oonal 
00164 60000 ONnn0 O4004 00144 60000 09600 04904 00165 40000 onont WF ONB2-  CYBITS-SNI ALOT /060: 05715778 
00170 60000 On000 U4004 00170 60000 00000 04004 on1T! £0000 conot 'Fe0ZAO.MONDONE FROM = 7Sm | oe 
0017% 60000 00000 osors 0017s 60000 09000 o4na% OO1TS £0000 anoot $7.02.40.1P 00000320 KONDS = & Nt Pe 
00200 00000 00000 o0000 00000 17.02.40.,00N. PSO+O27H+ T2CTOVVALMILLE 

§7.02.42. COMPASS (LO=9858) 


17,0204), ASSEMBLY COMPLETE. 506008 SCH USED. 
17.02.4), 0.10? CPU SECONDS ASSEMBLY TIME. 


17.02.43, LOAD ILGO) 

17.02.44. ENECUTE (STARTS 

17.02.45. NON-FATAL LOADER ERRORS - SEE MAP 
17,.02645.ERROR HODE 200. ADORESS =000814 
LV.02.4S.EAIT. 


17.02.46. OHPIDER ODED 
17.02646.0P 00001408 WORDS - FILE OUTPUT OC 40 
17.02.46.MS 3584 wORDS ¢ 10752 Max USED) 


17.02.46,CPA 0165 SEC. 01465 ADJ. 
17.02.46,10 0695 SEC. 2675 ADJ. 
17.02.46.CH $2.048 KwWS. 267% ADS. 
17.02.%6.55 1.516 

17.02.46.PP 4.56 SEC. . DATE 06/27/76 


yar? 44 £6 can ar wnn. Fee 


= ve ‘ t My +. 3 


nBhmRnmenmeHeeReanenm 


PARAMETERS 
FORTRAN EXTENDED 


THE CALL: 


me ACTUAL PARAMETERS = 
UAL: OUR. +4 ls, go Gog. Kg. ANS.) 


THE CODE GENERATED: 


(ADDRESSES 
OF 


. AN AP List is Created: | 


CAP1 ADDRESS of I 
. ADDRESS of J 


ADDRESS of K 


[ADDRESS of ans | _ 
ADDRESS OF AP List is set into Al 


PARAMETERS) 


TO INDICATE 
END OF LIST. 


eg Re VS executed to Subroutine 


Therefore, when the Subroutine is Entered: 


ae CR = AP list address | 
(XI!) = Address of First Parameter 


DA3020 


11-21 


EXAMPLE; 
The VALUE of I is l The ADDRESS of I is 206u 
The VALUE of J is 2 . The ADDRESS of J is 2061 
The VALUE of K is 3 | The ADDRESS of K is 2062 


The ADDRESS of ANS is 2057 
2057 ANS KKK 
2060 I 


2061 J 
2062 K 


2u50 CaPl Address of I 
2051 Address of J 
2052 Address of K 
2053 Address of ANS 
2054 


The CODE to enter the SUBROUTINE would be: 


SAl API 
RJ SUB 
(Al) = 2050 (X1) = 2060 
11-22 


207 ce! = es || J ~ a 


Pee . - | COMPASS 326-476. 01/05/79 10014017. PAGE 1 


IDENT Sup 
ENTRY Suu 


LIST “Bek 
OUeeeenoennrsseenenneeennneneonnneenneaecenneseecnonannedssccoccccccecccccsccece 


° e 
od COMPASS SUBROUTINE PICKING UP PARAMETERS FROM FORTRAN MAIN PROGRAM e 
Ln THE COMPASS SUBROUTINE MUST USE THE ADORESS PASSED To IT IN Al TO e 
* LOCATE THE PARAMETERS AND RETURN THE ANSWER. ° 
« e 
° e 
PORE OHOROHOEHAEAEHEDEHDUNOE DHA EHUREHEHDENEDORUUHROEDORHUEOOEREOOHORDREOERE OC ELE 
© 00000000000000000000 sus DATA Q : ADORESS PARAMETER LIST IS IN Al ON ENTRY 
1 53210 sa2 x} 1ST PARAMETER IN K2 (1) 
5011000001 SAl Alel 2ND PARAMETER ADORESS IN X1 
53310 SAJ x) 2ND PARAMETER IN X3 (U) 
2 5011200000) : SAl Alel 3RD PARAMETER ADDRESS IN K} (J) 
53410 ° SA4 x1 SRD PARAMETER IN X4 (K) 
‘ 36723 Ix? K2ex3 COMPUTE SUM 
3 3OTTS Ux? AT+Xs COMPUTE SUM 
5011000001 SAL Ale} 4TH PARAMETER ADDRESS IN X} 
53710 SAT al STORE ANSWER (ANSWER) : 
4 0400000000 « ea Sue RETURN TO CALLER 
5 ; ENO 
506008 CM STORAGE USED , 23 STATEMENTS i SYMBOLS 
MODEL 74 ASSEMBLY 0.112 SECONDS 0 REFERENCES 


€@-TT 


MFS NHI= CY874<SN10g 5C/ROB VAL 
10.14.12.00N0090 FROM 70H i" 
10614.12.1P 00000320 wORDS - FILE INPUT Oc 04 
10.14.12,00NyTS. 001As6483,18960MILLER 
10.14. 15.FINCOLeR=0) ; 

10.16.34, 2387 CP SECONDS COMPILA 
10.16.34.MAP»PART, Hee TEN 
10.16.34.1G0. , 

10416043, END PARAMS : 
0.16.63. ¢062 CP SECONDS EXECUTION TIM 
10.16.43,0P 00001792 WORDS = FILE OUTPUT « rf 40 
10016663.MS 3564 WORDS ( = 16336 MAX USED) 


10.16.43.CPA — 0592 SEC. 592 ADJ 
10.16.43.CPH * 0296 SEC, 3296 ADJ. 
10.164463.10 1.218 SEC, 1.2hd ADJ. 
10.16643.CM 36.786 KWS, 2.245 ADJ. 
10.16243.5S | 66353 

10.16.43.PP 7.116 SEC. DATE 01/05/79 


10.16.43.EN END OF you, On 


PROGRAM PARAMS 74/74 = OP Tal FIN 4.70485 01/08/79 10.24.15 PAGE 1 


1 PROGRAM PARAMS (OUTPUT) 
INTEGER ANSWER 
ANSWER=0 
1=1 
5 Jz2 
Ksj 
CALL SUB (Is JeK es ANSWER) . 
c SUB IS ENTERED WITH ADDRESS OF PARAMETER ADDRESSES IN Al. 
PRINT 10] : ‘ 
lo PRINT 10001 sJeKe ANSWER 
100 FORMAT (4110) 
102 FORMAT (1H1) 


END 
IWENT PARAMS 
USEULK : 
LOSET LIB=FORTRAN 
USE START, 
000000 002062 staat. LOCAL 
002062 000000 VARDIM. LucaL 
002062 000000 ENTRY, LOCAL 
He 002062 000021 cove, LOCAL 
i 002103 000022 pata. Local 
No 002125 000000 DaTa.. LOCAL 
& 002125 000000 Hot, LOCAL 
EXTERNALS 
NO. OUTCI. sua QZNTRY. 
000000 START. 17252420252400000001 FILCRM - OUTPUT#.20038,08 


000001 Start, 0000000000000000005} 
000002 START. 00000000000000000000 
000012 STant, 000V000000006v00N000 
000013 START, 00000000220000000000 
000014 Starr, 00000000000000000000 


000015 START. 1400000v0v0000000000 : ; 
600016 Start, 0000000000000000U0000 
000037 STANT. 000U00000nG00000VN000 


900020 STant, 00000000000000000000 
000021 START, 00000000000000002003 ; 
LIBLNK. 8SS 0B 
902054 START, 20010000000u00002057 LIBLNK § 1801415208 
002055 StTantT, 00000000000000141520 
002056 Start, 00000000000000000000 
: FILES. BSS o8 


002057 Start, 17252620252400000000 FLINK OUTPUT#s 

002060 Starr, 00000000000000000000 DATA Oo 

002061 Starr, 20012201152355002062 TRACE PARAMS» PARAMS 
USE CODE. 


eS = s 


PROGRAM PARAMS T4/74— OP Tal FIN 4.7¢485 01/05/79 10.14015 PAGE 2 


PENTRY PARAMSo0»9 


002062 CODE. 5110002054 START. Sal LIBLNK. : 
0100000000 <EXT> RJ Q2NTRY. 
USE DATA. 
USE DATAsce 
USE DATA. 
002103 DATA. 3101 uss 08 
002103 DATA. - 00000000000000000000: START. 10M vurPputTa 
002104 DATA. 000U0000000000002ZI17 DATA. “10M elal 
002105 DATA. 0000000000000000N0000 E10 ou 
002106 DATA. sea Vloe2 ‘pss 08 
002106 VATA. COOVODDDOODDVONLLOON START. 10M OUTPUT®@ 
002107 DATA. 00000000000000002115 DATA. 10M 210 
002110 UATAs 000200000001 V000zZI22 DATA. lum 1s0H9 28018 
002111 CATA. 00020000000100002123 DATA. 10M Je0Be2B010 
002112 DATA. 00020000000100002124 DATA. 10M Ke0H e208 
002113 DATA. 00020000000100002121 DATA. 10M ANSWER 0 00028018 
002114 DATA. 000000000000N0000000 €10 ou 
002115 OATA. 55393333555500000000 Fat 2100 
002116 DATA. §23712236335255555555 - Dis Qo t4tiod 
OO2ZIIT DATA. 55343334555500000000 FMT e101 
002120 DATA. §1341034525555555555 oO1s be (lH) 
ExT ENDe 
ExT OUTCI. 
eG EXT Suu 
t ExT OZNTRYe 
N 002121 DATA. ANSWER BSS 18 
G1 002122 DATA. 1 BSS 18 
002123 DATA. J oSS 18 
002124 DATA. K BSS 18 
USE CODE. 
* LINE 3 
002063 COVE. 43700 MXT 08 
7160000001 SX6 18 
002064 CODE. §170002122 OATA. SAT ANSWER 
T1 70000002 SXxT 2B 
‘002065 CODE. §160002122 DATA. SAB I 
7160000003 SX6 3B 
002066 COUE. §170002123 DATA. SAT J 
. 5160002124 DATA. SA6 « 
002067 COLE. 5110002076 CODE. SAL (API 
002070 CODE. 0200000000 <EXT> ry HUT ‘SUubeTB 
0007002061 
002071 CUDE. §110002103 DATA. SAL - 2101 
002072 CODE. 0100000000 <EXT> + RuT OUTCI.e118 
001100206) 
002073 CODE. 5110002106 DATA. “SAL llo2. 
002074 COLE. 0100000000 <EXxT> + RJT OUTCI.9128 
003200206) ; 
002075 COVE. 511000206) _ START. _ SAL TRACE. 
0400000000 <EXT> (a0) END. 
002076 COOE. (API ess 0B 
002076 CUDE. 00000000000000002122 DATA. APL oI 
002077 COVE. 00000000000000002123 DATA. APL J 
002100 CODE. 00000000000000002)24 DATA. APL K 
002101 CODE. 00000000000000002Z12) DATA. APL ANSWER 


002102 CODE. 00000000000000000000 APL 


LOAD HAP = SUB CYBER LOADER 1.4-489 01/05/79 10.16.40. PAGE de 
FwA OF THE LOAD Ma 

Lwael OF THE LOAD ' 7062 ; 

TRANSFER ADDRESS ~- PARAMS 2200 

PROGRAM ENTRY POINTS -< SuB 2200 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLOCK ADDRESS LENGTH FILE OATE . PROCSSA VER LEVEL HARDWARE COMMENTS 
Suv hi 5 téo 01/05/79 COMPASS 3.6 476 
PARAMS 116 2125 t6o0 01/05/79 FIN he? 405 666X I PROGRAM 3 OPT=] 
7STP.END/ 2243 1 ‘ 
SFCL Cos 2244 26 
ZQK01067 222 101 
Gentnys 2373 0 SL-FORTRAN 11/16/78 COMPASS 3.6 405 FCL INITIALIZATION ROUTINE. 
/FCLEENTS 2373 40 
CUM[O= 2433 33 SL-FORTRAN 23/16/78 COMPASS 3.6 445 COMMON CODED 1/0 ROUTINES AND CONSTANTS, 
FCL=FOL 2466 40 SL-FORTRAN 12/16/78 COMPASS 3.6 4685 FCL CAPSULE LOADING 
FEAF STs 2526 3 SL-FORTHAN 22/30/78 COMPASS 3.6 485 CONVERTED DATA STORAGE 
Fi.Touts 2531 311 SL-FORTRAN = 212710778 CUHMPASS 3.6 445 COHMON FLOATING OUTPUT CODE 
FOKSYS3 3042 30} SL-FORTRAN 11/10/78 COMPASS 3.6 485 FORTRAN UBJECT LivRany UTILITIES. 
ao OUTCOM2 3343 154 SL-FORTRAN 12716778 COMPASS 3.6 405 COMMON OUTPUT CODE 
. SYSAIDs d517 BD OSL<FORTHAN 11716778 CUMPASS 3.6 4685 CINK BETWEEN SYS=AID AND INITIALIZATION CODE. 
Pe FreCnane 3520 41 SL-FORTRAN = 21716/78 COMPASS 3.6 665 INITIALIZE CONSTANTS. 
ron) FeuTAPs 3561 357 SL-FORTRAN 12/16/78 COMPASS 3.6 445 CRACK APLIST AND FORMAT FOR KODER/KRAKER, 
FOoKUTLs 4140 46 SL-FONTRAN 147136/78 COMPASS 3.6 605 FCL MESC. UTILITIES. 
GETFITs 4206 D7 SL~FORTRAN = 21716/76 CUHPASS 3.6 405 LOCATE AN FIT GIVEN A FILE NAME, 
KOVER2 4265 451 SL-FORTRAN 21/16/78 COMPASS 3.6 405 OUTPUT FORMAT INTERPRETER, 
OUTC= 4736 150 SL-FOHTRAN 13716778 CUOMPASS-3.6 485 FORMATTED WRITE FORTRAN RECORO. 
7¥ DL. COM/ 5106 16 
FUL RES 5122 21) SL-SYSLIB =12/02/78 COMPASS 3.6 485 FAST DYNAHIC LOADER RESIDENT. 
FOL .MMI 5333 222 SL-SYSLIB =—-91702/78 CUHPASS 3.6 465 FOL MEMORY MANAGEH INTERFACE. 
CPU,LSYS 5555 40 SL-SYSLIB = 43715/78 COMPASS 3.6 476 PROCESS SYSTEH REQUEST. 
CHF ALF 5615 260 SL-SYSLIB =-13715/78 COMPASS 3.6 485 CHM VIed = ALLOCATE FIXED, 
CHF CSF $775 6 SL~SYSLIG =. 1/15/78 COMPASS 3.6 6485 CMM Viel = CHANGE SPECS FIXED. 
CHM.FFA 6003 14 SL~SVSLIBN = (11/15/78 COMPASS 3.6 485 CHM V1.) = FEXED FREE ALGORITHM. 
CMF FRE 6017 36 SL“SYSLIB = =-11715/778 COMPASS 3.6 405 CMM Viel = FREE FIXEO, 
CHM.R 6055 214 StL-SYSLEIG = 42/15/78 COMPASS 3.6 485 CHM VI.t ~ RESILVENT SUBHOUTINES,. 
CMF ..SLF 627) 22 SL-SYSLIW = =—-43735/78 CUMPASS 3.6 405 CHM VIR = SHRINK AT LwA FIXED. 
CTL32M 6313 433 SL-SYSLIW  =-12/716/78 COMPASS 3.6 445 CRM CONTROLLING ROUTINE. 
ERRSHM 6146 25 SL-SYSLIW = 38716778 COMPASS 3.6 485 CRM ERROR PROCESSOR ENTRY. ; 
LISTSAM 67.73 67 SL-SYSLIB = 11/16/78 COMPASS 3.6 445 CRH ~ ALLOCATE SPACE FOR LIST OF FILES 
2336 CP SECONDS 235008 CH STORAGE USED 42 TABLE MOVES 
. 1 2 3 6 


LerT 


PROGRAM DUMMY 73/74 OPT=} ‘ FIN 4.7¢485 Wr k08779 10.13.38 PAGE 1 
1 PROGRAM DUMMY (OUTPUT) 
SPOHODHEHHHEHSHEHHHUOHHHHHAHHROLEHROHOHROHEEHETEHAEHHHHHHOHAHHHHOHERHHORHCEHOHEREE 
: . e 
e e 
5 * A OUMMY FORTRAN PROGRAM IS SET UP TO DECLARE THE FILES ANO INITIALIZE e 
° AND DUMP THE BUFFERS CORRECTLY. THIS IS DONE BY QBENTRY. e 
° ry 
e e 
TTT rrr riviriirirriirrriririiiiiriitty) 
10 CALL MAINPGM . 
END 
MAINPGM © ; COMPASS 326 -47be 01/05/79 10.13.42. PAGE | 
IDENT MAINPGM 
ENTRY MAINPGM 
EXT OuTsus 
CIsT ~Be-R 
SSCHSSSHECHHHHAHSEHHHEHHHSSEHEKRHKHHHHHHOHHEHHSTEHHSHEHHHHSKAHOHHEESEHHALEEEEAHACEARRAD 
« 
* 88 ; 2 
* COMPASS MAIN PROGRAM CALLING A FORTRAN SUBROUTINE THAT DOES 170 « 
e . i] 
e e 
SHHEHEHHSHHEHAHHKHHHHRAHHKHKHHHEKRSEHHHHHHHKHEHRAKHEHEHHRHHHEHAREHHEEHAHREEHBERROOREHS 
0 00000000000000000000 MAINPGM DATA 0 
1 7160000010 SX6 8. 
5160000000 C SA6 BUF 
2 516000000) C SA6 BUF «} 
§160000002 C SAb BUF ¢2 
3. 0100000000 xX RJ OuTSuB 
4 0400000000 « €Q HAINPGM 
USE /LAB/ 
0 3 BUF BSSZ 3 
5 END 
506008 CM STORAGE USED '  @l STATEMENTS - 3 SYMBOLS 
: MODEL 74 ASSEMBLY 0.094 SECONDS O REFERENCES 
SUBROUTINE outsua 13/74 OPT=} FIN 4.7¢485 01/05/79 10.13.38 PAGE 
1 SUBROUTINE OUTSUB 
COMMON /LAW/ IBUF (3) 
PRINT 101 
PRINT 200° CIBUF (1) e12%)03) 
5 100 FORMAT(3024) 


102 FORMAT(IHI) 
END 


LOAD MAP = DUMMY | CYBER LOADER 1.4-485 01/05/79 10013053. . PAGE i 


Fwa OF THE LOAD 11) 


Lwaek OF THE LOAD 7050 
TRANSFER ADORESS -- OUMHY 2173 


PHOGRAM ENTRY POINTS <- OUMMY 2173 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLUCK ADDRESS LENGTH FILE DATE PROCSSR VER LEVEL HAROWARE COMMENTS 
OumMy Mt 2065 LGO 03/05/79 FIN 4e7 485 666X I PROGRAM OPT#=) 
/LAUS 2176 3 
HAINPGM 2201 5 LGo 01/05/79 COMPASS 3.6 476 
OuTsuy 2206 23 LGo 01/05/79 FIN 4e7 485 666K I SUBROUTINEOPTs)} 
JSTPLENDZ 223) 1 
7FCL eC os 2232 26 
108 .100/ 2260 101 : 
Q2NTRY= 2361 0 SL=FORTRAN 11/16/78 COMPASS 3.6 485 FCL INITIALIZATION ROUTINE. 
JFCLZENTS 2361 40 
Ccomio= 2421 33 SL-FORTRAN 11/16/78 COMPASS 3.6 485 COMMON CODED 1/0 ROUTINES AND CONSTANTS, 
hb FCusFOL 2454 40 SL-FORTRAN 11/716/78 COMPASS 3.6 485 FCL CAPSULE LOADING 
be FELFST= 254 3 SL=FORTRAN 11/16/78 COMPASS 3.6 485 CONVERTED DATA STORAGE 
ne FLTOUT= esi7 311 SL=FORTRAN 31/16/78 COMPASS 3.6 485 COMMON FLOATING OUTPUT CODE 
ron) FURSYS= 3030 301 SL=FORTRAN 11716778 COMPASS 3.6 485 FORTRAN OBJECT LIBRARY UTILITIES. 
OuTCOM= 3331 154 SL=FORTRAN 21716778 COMPASS 3.6 445 COMMON OUTPUT CODE 
SyYSalD= 3505 1 SL<FORTRAN 21716776 COMPASS 3.6 485 LINK BETWEEN SYS=AID AND INITIALIZATION CODE. 
FECMSK= 3506 41 SL-FORTRAN 131/16/778 COMPASS 3.6 485 INITEALIZE CONSTANTS. 
FaraPps 354? 357 SL-FORTRAN 11716778 COMPASS 3.6 485 CRACK APLIST AND FORMAT FOR KOVER/KRAKER,. 
FURUTL= 4126 46 SL-FORTRAN 11/16/78 COMPASS 3.6 485 ; FCL MISC. UTILITIES. 
GETFITs= 4ll4 57 SL-FORTRAN 13/16/78 COMPASS 3.6 445 LOCATE AN FIT GIVEN A FILE NAME. 
KUDER= 4253 451 SL-FORTRAN 112716778 COMPASS 346 465 ; OUTPUT FORMAT INTERPRETER, 
OuTc= 47124 150 SL-FORTRAN 11/16/78 COMPASS 3.6 485 FORMATTED WRITE FORTRAN RECORD. 
/FOL.COMS S074 le 
FUL.RES 5110 214 SL-SYSLIB 11/02/78 COMPASS 3.6 485 FAST DYNAMIC LOADER RESIDENT, 
FOL. MMI $32) 222 SL-SYSLIB 11/02/78 COMPASS 3.6 465 FOL MEMORY MANAGER INTEHFACE. 
CPu.sys §543 40 SL<-SYStIBb 11715778 COMPASS 3.6 476 PROCESS SYSTEM REQUEST. 
CMF ALF 5603 160 SU-SYSLIB 11/15/78 COMPASS 3.6 485 CMM Viel = ALLOCATE FIXED. 
Chr CSF 5763 6 SL-SYSLIB 11715778 COMPASS 3.6 485 CMM Viel =~ CHANGE SPECS FIXED. 
CMM.FFA $77) 14 SL-SYSLIB 11715778 COMPASS 3.6 485 Cum V1.1 - FIXED FREE ALGORITHH. 
ChHF FRE 6005 36 SL-SYSLIB 11/15/78 CUMPASS 3.6 485 CMM Viel = FREE FIXED. 
CMM.R 6043 216 SL-SYSLIB 11715778 COMPASS 3.6 485 CHM Viel = RESIDENT SUUROUTINESs 
CHF SUF 6257 22 St-SyYStia 31715/78 CUMPASS 3.6 485 CMM Viel = SHRINK AT LWA FIXED. 
CTLSRM 630) 433 SL-SYSLIy 13/16/78 COMPASS 3.6. 485 CRM CONTROLLING HOUTINE. 
ERRSRM 6734 25 SL-SYSLIY 11/16/78 COMPASS 3.6 485 CRM ERROR PROCESSOR ENTRY. : 
LISTSRM 6761 67 SL-SYSLIB 11/16/78 COMPASS 3.6 485. CRM ~ ALLOCATE SPACE FOR LIST OF FILES 


0350 CP SECONDS 235008 CM STORAGE USED h2 TABLE MOVES 


00000000000000000010 90000000000000000010 00000000000009000010 


MFS Nelle CY874-SN108 Sc/R08 11/14/78 
10.123.36.D0N009L FROM 70H ; 
10.013.36.1P 00000384 wORDS = FILE INPUT , OC 04 
10613-36.00NeTS. 001As688301E96GeMILLER 
30013.38.F TNeR=0. 
10.13.45. 0366 CP SECONOS COMPILATION TIME 
10613.45.MAP PART. 
10213-45.LG0.° 
10.13.56. END OUMMY 
10.13.56. 0071 CP SECONDS EXECUTION TIME 
10.13.56.0P 00001088 WORDS = FILE OUTPUT . DC «0 
30.33.56.MS 3584 woRoSsS (¢ 14336 MAX USED) 


10213.56.CPA 0623 SEC. e622 ADJ. 
10013256.CP8 e260 SEC. e26U ADU. 
10.13.56.10 1.663 SEC. 10663 ADJ. 
-10013-56.CmM 46.133 KwS. 2etl> ADU. 
10.13.56.SS : $e361 . 
30.13.56.PFP 11.208 SEC. DATE 01705/79 


10.13.56.EN END OF JOSs OH 


11-29 


O€-TT 


MAINONG 
STORAGE ALLOCATION. 
arCR&eEss LENGIM 
0 5 
S 


MAINPRG 


0 760000010 


5140000000 C 


1 S$160000001 ¢ 


$160000002 C 


AINAHY 

torent 

€nn 
ALOCKS TYOF 


PROGRAM® LOCAL 


LAB coumoy 


ENTRY POINTS. 


MATNPRGE 


thepass 1.5-4703 


CONTHOL CARDS, 


MA TNPOAG 
MATNPRG 
ADDRESS LENGTH 
0 5 
n 3 
ne 


EXTERNAL SYMAOLS. 


OUTSUR ss SYSe_ 


IDENT 
ENTRY. 
ExT 


COMPASS 3.5-470, 


“®INPAG 
MAINPRG 
AUTSUK | 


0477977H 09.11.51. PAGE 


06/27/78 09,381.51. PAGE 


SOHOOSOHHESHHOHHOHEHESEOHHHHECSSESASHHSLHOSEHREDHSSOEAHUSOOECEERECHOOOTOEREHEEHECE 


e 

e 

INCOHRECT StTUP FOR A COMPASS MAIN PROGRAM AND FORTRAN SUBROUTINE = 
e 

e 

e 


MAINPRG Sa4 
Sah 
SAA 
SAG 
Ry 
FNNRUN 
USE 

BUF S52 
FNn 


504008 SCH STORAGE USED | 


2 0100000000 x 
3 7160247021. 
0 3 
S 
MaINPOR 
SvMANL EC QFFFOENCE TAA, 
Aue " can 
MAINPAG 0 bonGrane 
OutTSsuUR a EXTERNAL S 
SVSs 0 CRTERNAL © 


MODEL 174 ASSEMBLY 


Aa 

nUF 
nur eo} 
RUF of 
nutsud 


/LaA7s 
4 
MAINPRG 


22 STATEMENTS 
0.042 SECONDS 


COMPASS 325-470. 


27t2 S$ 2714S Aste SS avTAL 
2702 € evi 

2709 x esis : 
avin ‘ 


& SYMAOLS 
9 REFERENCES 


08727/7Hh 69.11.51. PAGE 


SUBROUTINE OUTSUP Taste OPT) FIN &. 79470 06/27/7978 09.93.49 PAGE ’ 

’ SURQNUTINE oUuTSUA 
pe eee ee ee LITT LLL LL TLL) 
e e 
e . eo 

§ e THE: SUPQOUTINE CAN NOT OUTPUT CORRECTLY RECAUSE THE FILE BUFFERS HAVE nore 
® PEEN INTTSALEZFO. & FORTRAN MAIN PHOGRAM 1S REQUIRED. ° 
.. : e 
e ° 
bbe eth d ddd cht tht ALATEST ILI I ILI LETIIT ILI LIL ITTY TTY YY TTT 

to COMMON /LAA/ IAUF OD) 


PRINT LOMeTEAUFUEDotehe 3D 
100 FORPNAT (1020) 
enn 


MFF = NH2-) CYALTS-~-SN) 4LU7T/R68 05715776 
O9.11.47.NO0NONGN FROM “Sh 
O9.11.47.1P 00000320 wOHOS - FILE INPUT » OC 0% 
09.51.%7.00N, PSNeOZIBs T2CTOLIAMELLER 
OOD .OO.F INeh20, to 
09,591.52, «122 CP SECONNS COMPILATION TIME 
09.12.52, MAP ePART, ; 
09.11.52.160. 
09.11.54. “NON-FATAL LOADFR ERRORS ~- SEE MAP 
09.)3.54.F IN =~ NO OUTPUT FILE FOUND - EXECUTION E 
09.91.54, RRORS 
O9.1).54,FRROR MODE 20). ADORESS #40537) 
09.11.54.0P 00001792 WOHOS - FILE OUTPUT » DC 40 


TE-TT 


09.01.54.65 3584 wORDS ¢ 14336 MAR USED) 
09,11.54,CPA 0279 SEC. 0279 ADU. 
09.13.54.)0 1.629 SEC. 1.629 aduy, 
09.13.54.CM 31.296 KwS. 1.910 AOU. 
09.11.54.55 3.819 2. 
09.31.54%,PP 6.997 SEC. DATE 06/27/78 


09.41.5%.6) END OF JOR. SH 


1948p MAD - WATNEHG CYT LOANF 164-470 OA/2777R 09.39654. PAGE ’ 


Owa OF tf (OAD vas 

(wae OF TeF LOAN S16? 

THANSFER ANERESS -- MAINPAG the 

PROGRAM FNTAY PUINTS -- MAINPAGE tis 


Overeseoe FRROR SUMMARY 


NES200/7/ UNSATISFIED EXTERNAL REF -- OUTPUTE 


PROGRAM ANN BLOCK ASSIGNMENTS, 


7 LOCK s00ESS LENGIN TILE Nate PHOCSSA VEN LEVEL HARDWARE COMMENTS 
Lan une 3 ‘ 
YPaINPHE tye Ss Gn OA/ 297TH CUMPASS 3.5 470 # : 
outsuf 12) es 60 06/27/7768 FIN Get &70— totn fo SURROUTINEOPT ss] 
He 708.1027 ns on 
1 CUCL ENTS 26 a? 
ey AECL CoS rats 2s 
N costo vv?) US SL-FORTRAN 05702/77AR CUHPASS 3.5 470 COMMON CODED $70 ROUTINES AND CONSTANTS, 
FCUeFOL 337 40 SL-FORTHAN 05/02/70 COMPASS 3.9 470 FCL CAPSULE LOADING 
TMTAPe arr 307 SL-FORTRAN 057027778 CUHPASS 31.5 470 CHACK APLIST AND FORHAT FOR KOOERs/KRAKER. 
FORuUIL« Tit 66 SL-FORTRAN 05702778 CUHPASS 326% 470 FCu MESC. UNIILSTIES. 
COMTI ines 6) SL-FORTRAN 05702770 COMPASS 325 470 " COCATE ON FUT GIVEN A FILE NAME. 
eQADER« i125 461 SL-FORTAAN 05702778 COHPasS 3.69 470 OUTCUT FORMAT INTERPRETER. 
ovutca 1606 250 SL-FORTHAN 059/02770 CUNPASS 365 470° FORMATTED WRITE FORTRAN RECORD, 
FECHSKa 1956 @) SL-FONTRAN = 05702778 CUHPASS 3.9 470 INTEDALEZE CONSTANTS. 
pitoute 207 JES SL-FORTRAN 05702774 COMPASS 1.5 470 COMMON FLOATING OUTPUT CODE 
FORSTS« 23% JO? SL~FORTRAN 05702778 CtHPASS 3.9 470 FORTRAN OBJECT CENRARY UTILITIES. 
OuTCOHs ooh 204 SL-FORTAAN O6970777H CUHPASS 1.6% 470 COM4MON OUTPUT CODE 
CMF OLE S04? $60 SL-SYSLER «| O570277H COMPASS 3.69 490 CuM VI,d = ALLOCATE FEREO. 
CMF CSE sd??? A SE-SYSLEIM | 9470277 COMPASS T.% &70 CHM VEL = CHANGE SPECS FIAED. 
CHy era $290 b% SL-S¥StI0 0570277H COMPASS 3.69 410 CHM VIE ~ FEREO FOEE ALGoR DTM, 
CHF FE S244 3n SL-SVSLIA OS7U27TA CUMPASS 31.5 470 ; CHM VELE - FREE FUKEo. 
CHM RD $192 20) SL-SISLIA OS70277TU COMPASS 1.4% 470 CH VEL) - RESTOENT SUAROUTINES, 
Car sur 3505 ¢2 SL-SVSUIN 045702778 COMPASS 3.5 470 Con ViLt = Sumtnn AF Uwa FENED, : 
(aie Ld) che ed 60) SU-SVSLIA 0570277 COMPASS J.% 470 CRY CONTROLLING ROUTINE. 
fAayanm awn 2% SU-STSUEN 0570277 COMPASS 149 470 CRM FRROR PROCESSOR ENTRY. 
Cusisey VAS 6h SL-SYSLIBD OS70277N CUOHPASS 3.5 470 . Cia - aLLOCATE SPACE FOR LEST OF FILES 
7FOu .CaOMs east iz : : 
far .hts &6nl 7th SU-SvStTA OS714A77A COMPASS 365 470 CAST DYNAMIC LOADER HESTDENT. 
Me oes 4 taa 22? SE-STSUIN O5/160774 COMPASS 9.5 G20 FOU HEMORY MANAGER INTERFACE. 
SVS .um S12? 4m Su -SvSt ou OS7167 TR COMPASS 969 470 PROCESS SYSTEM REQUEST. 
of?0 FP SECONDS fP2000 6% Stakact Ustt . A Tame MOVES 


Owen, 

Pp 000000 #0 a00n0t RO 00000 

Pa 702400 Ab O0OtF) AL AODANN Ciabbes 4835 5555 5955 5555 5555 Ctatd= 6000 0000 6000 0000 0000 

FL 007200 82 0903905 R2 oounnt Cta2ys 0000 unon 0000 0000 oano2 CtA2d= 09000 00n0 0000 6000 0000 

—4 Foo700 43 00031) PI A00074 CtAWs 00 OnHH 0000 NONd 0000 CtA}d= on00 6000 0000 6000 0000 

RE 000045 .A& 005507 Re 000003 Ctaspe PII ortey very vey? F700 CtAsi= 9000 0000 000 0000 6000 

fF 000000 45 005624 AS oonnol CtaSt= 6000 0000 000 HHn0 000 CiIPSPe 9000 0000 0000 6000 0000 

4A 000800 46 001015 AH 00000 Ctabes £6935 5555 5555 5555 5555 Cinét=e ono} 4053 7300 0000 0000 
a? 005205 PF novots “Ctals= 0000 0000 0000 000 0076 CtRIie Hn00 0000 Cd0n 6000 0000 


wo ovv7Ty o6oFete 6h?) 6FOO §60000 
mL 4235 $555 5555 $555 5555 
x2 0000 ©0000 000N 0000 0002 
¥y BI25 2420 25248 0000 0000 
me opeyy ovrry ovryy Faery 608 
x5 0009 0000 90000 000 0000 
RH 4135 5555 5555 $555 5555 
xy 2000 0000 0009 0000 004 


00000 00004 05373 00000 00000 00000 0n000 n0000 00000 


00054 S4alho O3910 00054 54710 Sitoo onon) 03410 00055 64550 02558 00000 46066 Q0008 80088 €0008 00008 
00060 15058 52000 voono 0006) 000nn 05200 0000 C000) 07040 00060 $1600 0000) 04000 0006) 00000 0002) 
00064 14073 70000 00000 90000 - 00000 00000 ono? 72615 40000 00000 02000 oott! 00000 00000 40000 00006 
00070 $4071 75755 00000 00000 000NO ONH0H HONDO COHOO 
0080O #54000 OOn00 01000 ooo! 
os2?) 15557 71600 0015) 11565 
os2ts 03059 05277 61009 46000 39200 03220 41000 460n0 01000 O2582 00000 O5214 S251@ GoOl? 43746 15657 
05300 51600 05505 04000 051704 52530 00015 71600 05430 43152 15667 BITIS 36667 54656 46900 61000 46008 
05304 SIhoO 05295 $3209 00207 41500 O0001 41300 00203 63210 53010 Bo7tl 46000 06320 053188 Si000 00064 
a e510 74600 51608 05205 46000 04000 05312 41000 46000 51200 00313 S1100 05205 03020 O2471 Si200 00307 
1 05314 22122 031210 054620 41060 51504 0597) 53220 55455 13225 614060 00012 77304 ‘ 15420 22602 54225 54665 
w 05320 73934 03140 O5317 46000 T1204 05377 03060 05324 72330 00012 01000 01006 54660 46000 61000 46000 
bo 05326 01000 05453 OnN00 05261 5t500 us5t5 Sicoo 003%8 , 10755 51704 05404 54355 43044 20430 35640 46000 
7 05330 51500 055197 12736 SATIS 51300 00384 10455 63330 51200 02471 54675 21236 52427 TII¥6 61000 46000 
05334 10544 21560 62157 TIGT? &37IS2 £30184 05100 05364 43536 51300 05521 13143 15615 03060 05264 21336 
05340 13143 $5615 03060 05364 63740 04700 05364 541355 53160 bP27E 20252 12623 : 54665 20036 $1504 63210 
05344 03050 05374 51209 05522 24522 10722 4215? 70000 54765 05100 05347 $4545 73450 66420 01000 01001 
053950 66240 5467S 61000 46000 61404 05426 715164 76130 76520 20122 12615 3403) $1600 05518 78204 05431. 
05354 20309 3690) 72997 VITIS 01000 05453 00000 05241 Spi00 OS58h 63210 21122 633210 51604 05434 $6220 
05360 73820 04200 05344 46000. 03110 05364 697339 20236 Se427 T7776 $1500 05523 10655 54665 07030 05334 
05366 51400 00910 03140 05444 ' 51400 05205 61300 00074 61500 0000) 67495 63244 67223 66445 06200 05367 
05370 51440 05506 66223 22426 03240 05247 41000 46000 S1100 COIR $061) 46000 $1600 03015 04004 05373 
osvr 53340 64440 O374N TIIST 51400 00276 43260 Il62% 54665 03330 0535) 37666 £327) 20352 61100 00006 
05400 61400 00033 61009 46000 20303 154532 73544 20606 | 26665 6TLIS 05100 05401 51200 05525 10722 20614 
05404 71300 02355 20d40 12636 54760 54675 04000 05353 H624) 65546 $5161 T5517 25242 02524 $5061 11405 
05410 55061 72516 04556 65505 30050 32526 BIETI 65505 e222k T2223 $5000 00000 51500 05424 03150 05416 
05444 TA100 05406 43452 15116 711692 00000 01000 05153 . 43601 51600 05424 46000 04000 05365 61000 46000 
95420 26202 763430 36033 2030) 3630} 46000 43000 46000 01000 05453 60000 05241 04000 05247 61000 46000 
054246 40000 00000 00000 00000 0624) 65546 SSET2 52420 25265 SO6T) 94055 $2516 25230 10214 05000 00000 
05430 00000 00000 00000 00000 61500 00001 F100 05425 43652 15136 71602 00000 01000 05153 61000 46000 
05436 51100 00383 52510 00N15 THANG SITS? 1SH6F PITTS HHT 546650 51100 09205 23122 03010 05457 46000 
05440 51500 00107 PIRSA 4I4%2 15816 Tthu2 aOnov 46000 01000 05153 A000 46000 04000 05247 62000 44000 
054464 LITT S760 Y4NND O24Ih 61500 ON001 51300 O24674 10633 51600 02471 44000 51600 00310 04000 024672 
05450 239382 3OS22 225950 0545}  peyy Vevey vvvee eye 41500 00001 61000 46000 04004 05453 61000 46000 
05446 $1100 00133 ebtna 00001 53010 64500. 41600 05457 04000 04273 43000 00000 Siioo 0031383 51200 05505 
05460 51300 05205 52510 Q0n1T 49746 $5627 PLT Joon? 44650 62437 77654 46000 04600 05452 53210 41452 
05466 $1300 00308 BN262 3747) 03140 05452 §1200 00106 | 52510 onh22 43736 15357 37432 03940 05457 464000 
054TH 51200 O12 SE3NO O26Tt 10622 22Tu)d S1400 055027 51700 0550) 106446 20636 51600 05504 71900 0123 


PROGAAM TSIFUNC Vasile oPtst FIN 4, ?Peaho Ons2777A O91 OP PAGE ! 


1 PROGRAM TSTFUNC (OUTPUT) 


e ° 
r) e 
® FORTRAN PROGRAM CALLING A COMPASS FUNCTION ° 
; e 
: és 
COU III III TITirririrrirrrrryrririrririirririrrirrryy) 
ie? 

le (Je 

IFUNC AES Ee Ud . 

PAINT LO0eIFUNCef ed 
1O@ FORMATONIIOD 

€NnD 


sum COMPASS 3.5-470, 067277776 69.09.39. PAGE - 1 
s 
STOTUAGE ALLOCATION. 


- BPCRESS LENGTH HINARY CONTHOL CaROS. 


“4 0 ) IDFNE | psu 
bh 3 FND 
I 
i 
ea FNTAY POINTS, 
sure me 
Isun COMPASS 3.5-470, @6/27/78 09.11.99. | pace Pp 


BUENT = FSUM 


ENTRY —SUM 
0000008000605 0020500060 OS OO HEOODEOOECEODRODEDEDEUERDEEOODEDRELOEE HOES OOONLEOE 


e e 
° THE CALLING FORTRAN PHOGRAN GENERATES CODE 10 PASS PARAMETERS IN THE © 
° SAME MANNER FOR PASSING TO A SUBROUTINE. THE COMPASS FUNCTION PICKS © 
° UP PARAMETERS USING THE ADORESS PARAMETER LIST IN REGISTER Al. ° 
e e 
° IT RETURNS THE ANSWER IN X6, e 
e e 
OOOO OOOOH ORO eed ERS EEE DES OEHEDORREREODO RODEO OLED ODOORDOEDORQDDODEOCLEEOOEOED 
@ 0000¢0¢0080000000000 1SuM DATA 
1 53200 Sa2, xd Get I 
Setlecocoor Sal abel 
$3310 $a) wt GET J 
2 38823 1360 20K) ADD TWO VALUES 
0400000000 « €Q 1SuUuH RETURN WITH ANSWER tN A6 
3 END 
473008 SCH STORAGE USED le STATEMENTS 1 SYMBOLS 
MODEL 174 ASSENALY 0.026 SECONDS 3 REFERENCES 


Se-Lt 


POA HARP - ESTEUNG 


twa OF THE GOAN tat 

Pwaog OF Fee LOAD rst 

TRANSFER aNen—Ss -- ESTEUNCG aura 
PRPNCNAM FNTQY POINES -- tSTFUNC 
PROGRAN AND ALOCH ASSTEONMENTS, 

PLOCH snoness LENGTH rut 
TSTFUNC tee 210 co 
psu 2221 3 ico 
SvSaine e226 ) SL-FORtRAN 
757° UNDS 2225 '] 

7UCL CoS 2226 25 

70n.10./ 2251 yr 

O2nNTaYs 2352 0 SL-FORTRAN 
SOC AENTS 2352 42 

coMioes aaus 14 $8.-fORTRAN 
cue Oe 24 41 SL-TONTRAN 
rMTaPs earn VT St-FORTAAN 
FORUTLa son? 46 SL-FORTAAN 
GEM ETe 383s 61 SL-FORTRAN 
KODERs 3216 461 SL-FoOntAan 
Outce ont 150 SL-FORTRAN 
FECHSHe 406? &1 SL-FORTRAN 
1Lloute 4)in ‘38S SL-FORTAAN 
FORS VS® 4425 302 St-fONRTRAN 
OuTCOMe a72? 206 St-FORNTRAN 
Cue Ale Sd) 160 SL-SVSLID 
Cur CSF 5313 6 SL-SYSLIA 
Cun Fra $321 14 SL-SVSLEN 
CHF PBF 5305S Ye SL-SYSLIO 
"CHM SH S31) 203 SU-SV¥SLIB 
CHF SLF $606 22 SU-SVSLEB 
Cie san $6)0 . 60% SL~SVSLEO 
EROENM 64)) 25 SL-SYVSLIA 
CIstsvan 6456 66 SL-SVSLIB 
770 .COMs 6546 — 4 

FOL AES 6560 20) St-S¥StLfe 
Ce MP | ort 222 SL-SVSLIA 
S$V¥S5.0M rea) 60 SL-SYSLIN 

0314 CP SECONNS 
iu 2 4 


aun 


Date 


04721778 
On72777" 
ossn2s77A 


057027778 


05/02/78 
05702776 
05/02/78 
057027/17A 
05/02/78 
05/02/78 
05702779 
09/02s7h 
0$702/78 
0S5702/7TA 
0570277A 
05/02/76 
05702/TA 
05/02/76 
05/02/78 
05702778 
05/02/78 
05702/7A 
05/02/78 
05/02/16 


O5/736/7/ 
05716778 
05/86/78 


CVMEN LMANEN 4-470 


PHOCSSR 


rin 
CUOHP ASS 
COMPASS 


CUHPASS 


COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COHPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
COMPASS 
CUHPASS 
COHPASS 
COMPASS 
COMPASS 


COMPASS 
COMPASS 
COMPASS 


253007 £4 STOAAGt USFN 


wa & < 
-e@ 2 @ * 
Aw F -] 


kn ee en ee ee ee ee - 
AKAARAAAAAGANN AH W 


eeerses8tfes ec eeeese¢ 8 


LEVEL HARNWARE 


470 
470 
4170 


470 


410 
470 
&70 
470 
470 
470 
470 
470 
“70 
470 
#70 
410 
470 
470 
470 
470 
470 
470 
470 
“70 


470 


470 
«10 


TH™n OE. 


 O9,00.42, 


On77779AR OF,98 49. PAGE i] 
COMMENTS 
OPyal 


PROGRAM 


LINK BETWEEN SYS@AID AND UNETIAL ERATION CODE. 


FCL INITEALID RATION ROUTINE, 


COMMON CODED 870 ROUTINES AND CONSTANTS. 
FCL CAPSULE Loaninae 

CRACK APLIST AND FORMAT FOR KODER/KRAKER. 
FCL MESC. UTILITIES. 

LOCATE AN FUT GIVEN A FILE NAME, 

OUTPUT FORMAT INTERPRETER, 

FORMATTED WRITE FORTRAN RECORD. 

INSTAL EZE CONSTANTS. 

COMMON FLOATING OUTPUT CODE 

FORTRAN OBJECT LIBRARY UTILITIES. 

COMMON OUTPUT COOE 

CMH VE.b - ALLOCATE FIRED. 

CHM VDL) ~ CHANGE SPECS FERED. 

Chm VI,0 - FEXED FREE AL GORT TIM, 


“rr NRZ2- CYALIS-SHI 4LBI/RO8 05735770 
09.913.35.00N006" FRON sue 


O9.21,35.1P 100003h, wOHDS - FILE tNPUr e OC O04 


09.03.35.N0N. PSNeOZINOTZCTOPDACHILLER 
OOLD DL IPLF ING RHO, ie ale 
09.91.39, 0106 CP SECONDS CONPILATION TINE 


09,918.39, KAP,PART, 
09,91,39,160, 
O9,02 42, Enno WStFUNC 

OUT CP SECONDS Ext Cutton ThHE 


O9.98.42,.0P O000R2I64 WOHDS - FILE OUTPUT ¢ OC 4n 


O9,29.42.4S 3504 wORDS ¢ $7920 HAN USED) 
O9.2b eo 42.CPA e259 SEC. 0299 ADD. 
09.03.42.,10 9.573 SEC. 1.47} ads. 


09,82.42.CM 
O09.09.42.55 
O09.1).42.PP 
09.00.49. 1 


29.455 KS, §.809 ADS. 
3.662 
6.200 SEC, OAVE 06721776 


FN NF wna, co 


PARAMETERS. 


COBOL . 


THE CALL: 


ENTER SUB, PARM1, PARM2, PARM3 


THE Cope GENERATED: 


* IDENTICAL To Fortran ExTENnDED 


11-36 


- aa fae 
el ae 
1 


LE-TT 


AO 0112 coeoL Ve? 14865 0137086/79 10.25.56. PAGE i 
00001  IOENTIFICATION DIVISION. 
00002 D 
00003 PROGRAM-1D. PAPAN. 
00004 
00005 ENVIRONMENT OLVISION. 
00006 CONFIGURATION SECTIONS 
oouor SOURCE-~COMPUTER. 6600. 
ov008 OBJECT-COMPUTEH. 6600. 
00009 SPECIAL -NAME S. 
00010 OUTPUT-C IS PRINT. 
ooull 
00012 DATA DIVISION. 
00033 WORK ENG-STOHAGE SECTION. 
00014 77° «=PARML USAGE 15 COMPUTATIONAL<-2 VALUE IS 3. 
00015 ‘ 77 =PAHM2 USAGE JS COMPUTATIONAL©2 VALUE IS 4. 
00016 77) = PAHMZ USAGE ITS COMPUTATIONAL<-2 VALUE IS 0. 
00017 77) =PARM& USAGE 15 COMPUTATIONAL SIZE IS 1 DIGITS. 
00u18 77 =PARMS USAGE 1S COMPUTATIONAL SIZE IS 1 OIGITS. 
00019 TT =PARMG USAGE 1S COMPUTATIONAL SIZE 35 1 DIGITS. 
PAPAM — AO 0112 Copo. V4e7 L485 03/06/79 10.25.58. ° PAGE 2 
00020 PROCEOURE DIVISION. 
Oouel . 
douz2 BEGIN. 
00023 DISPLAY “PARAMETER 1 IS: © PARML UPON PRINT. 
00026 DISPLAY " PARAMETER 2 1S  PARM2. UPON PRINT. 
aes DISPLAY " PARAMETER 3 IS  PARMZ UPON PRINT. 
Oude? ENTER SAM» PARM2s PARMIs PARM3. - 
00028 MOVE PARME TO PARH4. 
O0ucY MOVE PAHM2 TO PARMS. 
00030 HOVE PARH3 TO PARMO. 
0003) DISPLAY ™ PAHAMETER 1 1S PARNS UPON PRINT. 
eee eLeaLay * PARAMETER 2 IS * PARMS UPON PRINT. 
SPLAY © THE SuM 1s “ Par 
00034 STOP AUN. 46 UPON PRINT. 


PAPAM LENGTH IS 0600151 
0610008 SCM USED 


SAM , COMPASS 3.6476, 02708779 10.26.03. PAGE | 


IDENT Sam 
ENTRY Sam 
List “Bork 
0 00000000000000000000 SAM DATA U1) ENTRY/EXIT ADDRESS 
1 $3210 SaA2 x) PARAMETER b IN x2 
5041000002 SA4 Ale) ADDRESS OF SECOND PARAMETER 
53340 SA3 X4 PARAMETER 2 IN X93 
2 30623 FXx6 X2eX3 
24606 NX6 
5041000002 SA4 Ale2 PICK UP 3RD PARAMETER ADDRESS 
3 53640 SA6 x4 STORE 3RD PARAMETER 
0400000000 + ? EQ SAH 
4 ; END 
475008 CM STORAGE USED 13 STATEMENTS 1 SYMBOLS 
3 MODEL 73 ASSEMBLY 0.035 SECONDS 0 REFERENCES 


8E-TT 


LOAD MAP =~ OUTPUTSA CYBER LOADER 1.4-485 01/06/79 10.26.05, | PAGE ] 
| 
FA OF THE LOAD Mba 
Lwae) OF THE LOAD $335 
TRANSFER AODRESS ~~ CENT.00 412 


PHUGRAM ENTRY POINTS ~= OUTPUT# 412 


PROGRAM AND BLOCK ASSIGNMENTS. 


BLUCK ADDRESS LENGTH FILE DATE PHOCSSA VER LEVEL HAROWARE COMMENTS 
OuTPUT®# an) 116 go, 01/08/79 COHOL 4.7 L485 I 
InPuta 227 116 LGo O1/08779 COUOL 4.7 £485 I 
70.COMON/S 345 24: 
O.CUMON 371 0 L6O 01/08/79 COBOL 4.7 1485 | 
JPAPAMA/ 37} 2} 
PAPAM 412 151 Leo 01/00/79 COHOL «4.7 (485 I 
SAM $6) r LGoO 01/08/79 CUMPASS 3.6 476 
C=CUb10 561 751 SL=CO8OL 31/16/78 COMPASS 3.6 485 
O=CAMES 1540 10 SL-COUOL | 11716778 COMPASS 3.6 465 
O=USE 1550 211 St-covot 137167768 COMPASS 3.6 465 
D=UDSPLY 176) 437 SL-COBOL 11/16/78 COMPASS 3.6 485 
7SIPLENDZ 2420. 1 
C=NSTAN 2421 153 SL-COBOL 1716/70 COUPASS 3.6 485 
ra O=TENS 2574 25 SL-COUUOL 12/16/76 CUBPASS 3.6 445 
1 O0=Cvso0 262) 136 St-Conotr ‘11/16/76 COMPASS 3.6 465 
bo D=UN 275? . 22 SL-COBOL - 1276/7 COMPASS 3.6 485 
\o U=MOVE . 3000 132 SL-CuboL 21/16/78 COMPASS 3.6 485 
O=THUDL * 39439 12h SL-COUVOL 11/26/70 COMPASS 3.6 645 
D=INTAB 3254 12 StL-ConOL 11/10/78 COMPASS 3.6 485 
O=TENDP 3266 73 SL-CusOL L1/26/7TH COMPASS 3.6 405 
JF OL eCOMZ 3361 16 ; 
FUL.KES 3375 211 SL-SYSLIB 11/02/78 COMPASS 3.6 485 FAST DYNAMIC LOAVER RESIDENT. 
FOL .MML 3606 222 SL-SYSLIB 11702778 COMPASS 3.6 4u5 FOL MEMORY MANAGER INTERFACE. 
chu. sys 4030 40 SL-SYSLIB 11/15/70 CUMPASS 3.6 476 PROCESS SYSTEM REQUEST, 
CHE CALF 4070 ' $60 SL-SYSLIB P1Z15S/78 COMPASS 3.6 485 CHM Viel = ALLOCATE FIXED. 
CHE .CSF - 6250 6 SL-SYSLIB 11715770 COMPASS 3.6 485 CMM Viel = CHANGE SPECS FIXED. 
CHM.FFA 4256 | 4 SL-SYSLI8 1715/78 COMPASS 3.6 485 CMM Viel - FIXED FREE ALGORITHM. 
CMF .FRE 4272 36 SL-SYSLIB 11/15/78 COMPASS 3.6 4465 CMM Viel ~ FREE FIXED. 
Crm. 4330 214 SL-SYSLIO Q1/1S/TU COMPASS 3.6 485 CMM Viok = RESIDENT SUDROUTINES. 
CHF «SUF 4546 22 SL~SYSLIG 12/715/78 COMPASS 3.6 485 CHM Viel - SHRINK AT LWA FIXED. 
CILSHe 4566 433 SL-SYSLI8 11716778 CUMPASS 3.6 485 | CAM CONTROLLING ROUTINE. 
ERRSHM $221 25 SL-SYSLI6B 11/10/78 COMPASS 3.6 485 CRM ERHOR PROCESSOR ENTRY, 
3.6 485 CRM - ALLUCATE SPACE FOR LIST OF FILES 


LISTSRH 5246 67 SL-SYSLIb 11/16/76 COMPASS 


©3116 CP SECONDS 21600B CM STORAGE USED 9 TABLE MOVES 


PARAMETER 1 IS 
PARAMETER 2 IS 
PARAMETER 3 IS 


PARAMETER 


PARAMETER 2 


THE Sum 


00000000030000 
00000000040000 
90000000000000 
3 


4 
7 


MFS NBl= CY874=SN104 5C/ROB 11714778 
10.25654.D0N00Ka FROM 70H 
20625.546.IP 00000384 wORDS « FILE INPUT + DC 0« 
10.25.55.D0N.TS, 9014+9688301896seMILLER 
10.25.57.REWINOsOUTPUT. 


10.25.57.CUGOL, _ 

10.25.59.COMPILING PAPAM 

10026401. 000 E AND T/U OIAGNOSTICS IssuED 
10.26.01. 0610008 SCM USED 

10.26.01. 0321 CP SECONDS COMPILATION TIME 
10.26.01.ENU COBOL 

10.26.02.COMPASS, : 

10626403. ASSEMBLY COMPLETE. 475008 cm USED. 
10.26.03. 06173 CPU SECONDS ASSEMULY TIME, 
10626.03.L60. 

10026.06.EXIT. 


1026.06.07 090001216 wORDS = FILE ouTPuT , OC 40 
10.26.06.MS 3584 wORDS ( 10752 max USED) 


30.26.06.CPA e713 SEC. e713 ADU. 
10.26.06.CPH 029) SEC, 0291 adu. 
1026.06.10 1.274 SEC, 1.274 ADU. 
10.26.06.Cm 47.992 KWS, "20929 ADU. 
19626.06.55 5.208 

10026.06.PP 7.970 SEC, OATE 01/08/79 


10026.06.EU END OF JO8e OH 


Tv-TT 


00003 
00002 
00003 
00004 
00005 
00006 
00007 
00008 
00009 
00010 
0001! 
00012 
00019 
00014 
00015 
00016 
00017 
00018 
00019 
00020 
00021 
00022 
00023 
00024 
00025 
00026 
00027 
00028 
00029 
00030 
0003) 
00032 
00033 
00034 
00035 
00036 
00037 
00038 


AO 0183 , coBoL V4.7? Latoe 06/27/78 09.07.03. PAGE | 


IOENTIFICATION OIVISION. 
PROGRAM-1D. ASTERISK. 
ENVIRONMENT OIVISION. 


CONFIGURATION SECTION. 
SOURCE-COMPUTER. 6600. 
OBJECT-COHPUTER. 6600, 
INPUT-OUTPUT SECTIONS 
FILE-CONTROL. 

SELECT OUTFILE ASSIGN TO OUTPUT. 


DATA OIVISION. 


FILE SECTION, 
FO OUTFILE 
LABEL RECORDS ARE OMITTED 
DATA RECORD IS KAKKe 
O1 AXXX PICTURE X(136). 
WORK ING*STORAGE SECTION. 
77 ONE PICTURE 9110) USAGE IS COMPUTATIONAL-] VALUE IS 
77 FOUR PICTURE 9410) USAGE IS COMPUTATIONAL@~] VALUE IS 4. 
77 TEN PICTURE 9410) USAGE 1S COMPUTATIONAL-1 VALUE IS 10. 
77 KWORD PICTURE 9(10) USAGE I$ COMPUTATIONAL@~1. 
77 XPOS PICTURE 9410) USAGE IS COMPUTATIONAL-1. 
61 HOR, 
02 FILLER PICTURE X(22) VALUE # THE STAR WAS IN WORD #, 
02 WORD PICTURE 2222272729. 
02 FILLER PICTURE X(20) VALUE # CHARACTER POSITION #@, 
O2 POS PICTURE 222222229. 
01. A PICTURE X(20) VALUE # FOR TABLE As. 
01 B PICTURE X(20) VALUE 4 FOR TABLE BA, 
01 C PICTURE K(20) VALUE # FOR TABLE Cr, 
0} BUFF. 
02 AA PICTURE A110) OCCURS 10 TIMES. ‘ 
O02 OB PICTURE X(10) OCCURS 10 TIMES. 
02 CC PICTURE X(10) OCCURS 10 TIMES. 


ao 011) conor Vee? LATO® 06727778 09,072.03. PAGE 2 


ASTERIS 
00039 PANCENURE OLVEISTON. 
00040 ROLLOUT. 
0004) OPEN OUTPUT OUTFILE> 
00042 MOVE #*ANL26 TO AATIOD. 
0004) MOVE vAnee TO CCUDDs 
00044 ENTER SEARCH AAUDD oTENe RVORNSAPOS. 
00045 HOVE RWORD TO WORD. 
00046 MOVE XPOS TO POS. 
00047 WALTTE KAKK FROM A, 
00048 WRITE KXAN FROM HOR, 
00049 ENTER SEARCH. BBE) cONEsXWORDs APOS. 
e00se MOVE AWOAD TO WORD. 
e005) MOVE XPOS TO POS. 
90052 WAETE ANAK FROM Be 
00053 MATTE XAKXK FROM MDA, 
00054 ENTER SEARCHe COUR) oFOURs eo KMORD EXPOS. 
00055 MOVE XWORD TO WORD, 
00056 MOVE XPOS TO POS. 
e005? WRITE AMM FROM Co 
¢0058 WRITE KAXK FROM HOR. 
@0059 CLOSE OUTFILE. 
00060 : STOP RUN. 


ASTERTS LENGTH 1$ 060942 
9612008 SCM USED 


(@P-TT 


SEARCH COMPASS 3-5-470. 06727778 09.07 .0he- PAGE | 
STORAGE ALLOCATION. 
ANDRESS LENGTH BINAHY CONTHOL CARDS. 
0 22 IDENT SFARCH 
22 END 

ALOCKS Type AODRESS LENGTH 

PROGRAMS LOCAL 0 ra) 

LITERALS® LOCAL 21 | 


ENTRY POENTS. 


SEARCH Oe i \ 


ET=TL 


ep auc 
1DFNE Seance 
FNIQY Seance 
° Cant. 
«? S7TaR fou ata 
oO FrvrvvveveTveraer eye spavcy | =6atA fa 
4 $1210 ; sap oul 
sattoonnny Say abed 
53110 $a) al 
2 Snitonnool Say altel 
5490 GA4% w) 
3 SAttooronl Sat abe 
$3510 gas ut 
& 6130000000 SR) n 
S G68200n00I8 ; QuUILOOP $82 9 
$412) Sal a2eA}3 
6 FEPOQ00006 INL OooP sur rs 
76020 ; Sxn n2 
42007 1x0 noex? 
7 69400 . §A4 x0 
?1 70000077 Sav 7?e : 
23441 ANA A4eXt 
fo) «610667 : Ox6 MOOK? 
V26GTTITVO Sx6 n6-STAR 
1) 0706000036 « a X6.FOUNN 
GU22TII II Sf2 R2-1 
12 O420bn0006 - GE A2.INLOOP 
6133000001 $A3 HIeol 
93 63430 SN4 nJ 
0534000005 ° NE AI.N4 OTL OO 
1% SI100N0028 - sal a-0 
hosel AXA” n} 
5440 SA as 
1S 54650 SA6 as 
0400000000 °« €0 SEARCH 
16 7163000001 FOUND S64 Ade} 
54640 §a6 A& 
1? 6160000012 SBA 10 
RLY Skh n6-B2 
54450 SA6 as 
20 0400009000 - €Q SEARCH 
22 €NOD 
47300A SCH SINRAGE USED 4) 


MODEL 174 ASSEMBLY 


SEARCH 

SYMBOLIC AREFEQENCE FANLE. 

FOUND t6 PROGRAH® 272% e738 tb 

Ina oaP 6 PROGR ANe® 2/164 272h 

Ouwle ooP : 5 PROAGRAH® 2/14 L 2729 

SFaAcn a) PHOGRAN® 2702 € 2705 L 2/34 
Svar 41 2704 0 272) 


0.055 SECONDS 


coueass 1.5-470, O4777/7R 09,07.0h. e 


{ 


SE ARCHIARRAY NAME APPAY LENGTHeWORK MMAED CHARACTER POSITION) 


Entavsenyt 
ANDRESS OF ARRAY IN AZ. IST WORD IN K2 
INDEK 10 NEXT PARSHETER(2ND PARAMETER) 


ANDGESS OF AMRAY LENGTH IN Ade VALUE IM 23 


INDEX TA NEXT PARAMFTER (IRD PARAMETER) 
ANDRESS OF WORD POSITION IN AS 

INDEX TO NEXT PARAMETER (4TH PARAMETERD 
ANDPESS NF CHARACTER POSITION IN AS 

CURRENT WORD INDEX IN 83 

REVERSE CHARACTER POSTTION §NOEX In B2 

LOAD INDFXED ELEMENT OF aPpRay 

X7 s NUMAER OF RITS PFR CHARACTER 

CHARACTER INDEX TO xn 

ACTUAL SHIFT COUNT To xO 

NOW 10 fie 

LOWER 6 AIT MASK TO KX? 

SHIFT XE RIGHT O40 PUT TT EN K6 

LOGICAL PRODUCT ALL BUT LOWFR SER BETS 
SUBTRACT CONDE FOR CHARACTER BEING LOOKED FoR 
GO 10 FOUND IF EQUAL 10 ZERO 

REDUCE SHIFT INDEX 

If NOT NEGATIVEs CONTINUE INNER LOOP 

INDEX TO NEXT WORD 

ARRAY LENGTH FOR COMPARISON 

P fF NOT EQUAL se RESET AND CONTINUE OUTER LOOP 
GET -0 FOR NOFIND FLAG #08 NO FIND eee 
TRANSFER R6 TM KY 

STORE INTO ARRAY WORD NUMAERe SHOW NOT FOUND 
SET CHARACTER POSITION EoUAL TO MINUS ZERO 
EXE V---NO MATCH 

WORD NUMAERe 2170 MAXTHUMD 10 X6 

SET IN PARAMETER (WORD POSTTION) 

CHARACTER POSITION § TO 10 

Bo - SHIFT INDEX = CHARACTER POSITION 

STORE PARAMETER (CHARACTER POSETIOND 
EXtT----FOuND 


§ SVYMROLS 
12 REFERENCES 


STATEMENTS 


06/27/78 09,07.606. 


COMPASS 3.5-470, 


2740 


AGE 


PAGE 


? 


VP-TT 


LOAN MaP ~- QUIPUT= CVHER LOANER 1.4-470 OH72777A 09,07.10. PAGE i] 


Fua OF THE LOAD dt 

Lwael OF THE LOAD 7033 

TRANSFER ADCRESS -- CENT.00 376 

PROGRAM ENTRY PUINTS <= QutTPUTES 36 


PROGRAM AND ALOCK ASSIGNMENTS, | 


ALOCK ADDRESS LENGTH FILE Date PHOCSSR VER LEVEL HARDWARE COMMENTS 

ourput= na tia LGo 04/27/78 COBOL ‘4-7? L&70® i 

INPUT= 22? 116 LGo 06/27/78 COBOL &o7F L708 1 

70.COMONS 345 24° : 

0.COMON 3m (i) .co 06727778 COROL 4o? Lo708 | 

JASTERYE7 371 5 

ASTEQIS 376 3e2 co 06/27/78 COBOL we? L&T08 t 

SEARCH 740 22 (co 06/27/78 COMPASS 3.5 470 

ovosvA 162 110 St-COPOL 05/07/77 CUMPASS 3.5 470 

D=CKETL to72 1S SL-COROL 05/707/7A COMPASS 36S 470 

c«conlo tio? 75) S$L-COROL 05/07/78 COMPASS 3.5 470 

D=CHMIS "2060 10 SL-COROL 05/07778 COMPASS 365 470 

DeSOlo 2070 445 SL-COROL 05/07/78 COMPASS 365 470 

O2USE 2535 211 St-COROL 05/07/78 COMPASS 3.5 470 

7S1P ENN? 2746 t 

C2NSTAN | 2747 155 $t-COAOL 05707778 CUMPASS 3.5 &70 

OZTENS 3426 25 SL-COROL 05/07/78 CUMPASS 3.5 “70 

OfCvAOD gu5) 137 SL-coBeoL 05/07/7786 COMPASS 3.5 470 

07BN 3di0 22 SL-COBOL 05/07/7AH CUMPASS 9.5 470 

ira 3332 456 SL-COROL 05/07/78 COMPASS 3.5 470 

0=COLSO 4010 18% SL-COoB0L 05/07/78 COMPASS 3.5 470 

O=FCOCH 4124 186 S$L-CORnGL 05/07778 COMPASS 3.5 470 : 
Canvi &242 100 SL-COROL 05707778 COMPASS 3.5 “70 

O#TRUBL 4342 121 SL-COROL 05/07/78 COMPASS 1.5 “70 

O=TENOP 446) 73 SL-COROL 05/07/78 CUMPASS 3.5 “70 ; 

CHF ALF 4556 160 SL-SYSLI6 05/02/78 COMPASS 3.5 470 CHM Vit © ALLOCATE FRKED. 

CMF CSF : o7136 6 SL-SYSLIB 05/02/78 COMPASS 3.5 470 CMM V1.1 © CHANGE SPECS FIRED. 
CHM.FFA aT4e 1% SL-SYSLIB 05702778 CUMPASS 3.5 470 CHM VIE - FINED FREE ALGORITHM, 
CMF FRE ‘4760 36 SL-SYSLI@® 0570277A COMPASS 3.5 470. Cum Vi.) - FREE FIXED. 

cum PR 5016 213 SL-SYSLIA 05/0277A CUMPASS 3.5 470 CMM VI,1 = RESIDENT SUAROUTINES. 
CMF SLE $231 22 SL-SYSLIB 05/02/78 COMPASS 3.5 %70 CHM V).) - SHRINM AT LWA FIRAEO. 
CTILSLAL $25) 25 SLU-SYSLIB 0570277A COMPASS 3.5 470 CRM CONTROLLER - LABFL PROCESSING. 
CTL SAM 5300 601 St-SYSLIB 05/0277 COMPASS 3.5 470 CRM CONTROLLING ROUTINE. 

Ctiswea 6301 31 SL-SYSLIA 05/02778 COMPASS 3.5 “79 CRM CONTROLLER - WEOXs REWIND 
FRAsRM 6132 25 SU-SYSLIB 05/02/78 CUMPASS 3.5 470 CRM ERROR PROCESSOR ENTRY. 
LISTSRM 6157 66 SL-SYSLIA 05702/7R CUMPASS 3.5 eI CRM = ALLOCATE SPACE FOR LIST OF FILFS 
7FOL COM 6245 14 

FOL PES h261 211 SU-SYSLIB 05/16/78 COMPASS 3.5 470 FAST DYNAMIC LOADER RESIDENT. 
FOU .MHE O47? 222 SL-SYSLIB 05/16/78 COMPASS 1.5 470 FOL MEMORY MANAGER INTERFACE. : 
SY¥S.AM OT14 40 SL-SYSLIB = 05716778 COMPASS 3.5 &70 PROCESS SYSTEM REQUEST. 

CILSSKP 6154 ST SL-SYSLIB 05/02/7A COMPASS 3.5 470 CRM CONTROLLER - SKIP PHYSICAL/FILE. 


LOAD MAP - QUtPUr: . CVAER LOADER 1,4-470 O4/27/7A 09.07.10, PAGE 2 
2149 CP SECONDS 23200R CM STORAGE USED 19 TABLE MOVES 
FOR TARLE & : 
THE STAR WAS IN WORD TO CHARACTER POSITION | 1 
FOR TARLE 8 
THE STAR waS IN woRD 0 CHARACTER POSITION 0 
FoR TaALF C 
THE STAR was IN woan 1 CHARACTER POSITION 3 


“FF NA2- CVAITS-SNI “LB7/R68 05/35/78 


09.06.59.N0NN0S52 FROM 7SH 
09,.06.59.1P 00000704 wORDS - FILE INPUT 6 OC 06 


hw 
09.06.59.00N. PSOeO27 Ae TPCTOLIASMILLER 
- 09,07.02.COROL. 
wn 09.07.04.COMPILING ASTERIS 
09.07.05. 000 E ANO 1/0) OTAGNOSTICS ISSUED 
09.07.05, 063200A SCM USFD 
09.07.05, e182 CP SECONDS COMPILATION TIME p 
09.07.05.—END COROL 
09.07.05.COMPASS,. 


09.07.07. ASSEMBLY COMPLETE. 47300AR SCM USED. 
09.07.07, 0.109 CPU SECONDS ASSEMALY TIME. 


09.07.07.160. 
OD.0F.12.ENIT. 

09.07.12.0P 0000204 WOHDS - FILE OUTPUT « OC 4n ; 

09.07.12.mS 3584 woRDS ¢ 14336 MAX USED) ; é 
09.07.12.CPA 2500 SFC. 2500 ADJ, 

09.07.12.50 1.416 SEC. 1.816 ADJ. 

09.07.12. 45.907 KeS. 2.801 ADJ. 

09.07.82.55 : 5.119 

09.07.12.PP 10.551 SEC. DATE 06/27/76 


09.07.32.E4 END OF yOBs SH 


QUIZZES 


PLACE THE FOLLOWING NUMBERS IN FLOATING POINT 
PRESENTATION, ALL NUMBERS ARE NOW DECIMAL, . 


5 x 20 
5 x 976 


=(5 x 26) 
=(5 x 278) 


15 
-10 
(1 x 264) 


Ser era 


CONVERT THE FOLLOWING NUMBERS FROM FLOATING POINT 
FORM To (C x 2E) Form, 


3066 0000 0000 0000 0032 


— 1512 0000 0000 0000 0260 
5710 7777 7777 «7777 «7755 


7733 7777 7777 1777 T707 


CHANGE THE FOLLOWING FLOATING POINT NUMBERS TO 
OCTAL (INTEGER FRACTION FORM), 


1722 5000 0000 0000 0000 
1730 5006 0000 0000 0000 
1721 6400 0000 0000 0000 
1675 7000 0000 0000 0000 
1720 6550 0000 0000 0000 
1747 4000 0007 0000 0000 
6055 1777 7777 7777 7777 
6055 1477 7777 7777 7777 
6071 1777 7777 7777 7777 
1736 5123 4567 7700 0000 


WRITE AN INSTRUCTION THAT WILL CHANGE THE PROGRAM 
SEQUENCE TO ONE OF FIVE SUBROUTINES, DEPENDING UPON 
THE CONTENTS OF THE Bl INDEX REGISTER. THE INITIAL 
ADDRESS OF ALL THE ROUTINES IS CALLED “BASEADDR”, 


WRITE AN INSTRUCTION THAT TESTS THE CONTENTS OF XO 
FOR ZERO, AND IF THE CONDITION IS MET THE PROGRAM 


BRANCHES TO “DONE”, 


WRITE AN INSTRUCTION THAT CHECKS Bl AGAINST Bl To 
SEE IF THEY ARE EQUAL. IF THEY ARE EQUAL, BRANCH 
TO A LOCATION CALLED “MATCH”, 


WRITE AN INSTRUCTION TO PERFORM THE LOGICAL PRO- 
DUCT OF THE OPERANDS IN X6 AND X4, AND SEND THE 
RESULT TO X6, 


" WRITE AN INSTRUCTION THAT SHIFTS THE CONTENTS OF 


THE Xl REGISTER LEFT 1249 (149) PLACES, 


WRITE AN INSTRUCTION THAT UNPACKS THE FLOATING 


POINT QUANTITY IN Xl], PLACING THE EXPONENT IN BI, 
AND THE COEFFICIENT IN Xl, : 


WRITE AN INSTRUCTION WHICH PERFORMS THE FLOATING 
POINT ADDITION WITH THE OPERANDS IN X4 anp X5, 


PLACING THE NEW RESULT BACK IN X6, THE OPERANDS 


ARE IN FLOATING POINT FORMAT, 


WRITE AN INSTRUCTION TO PERFORM THE INTEGER DIF- 
FERENCE OF THE 60-BIT OPERANDS IN X4 and X5, (X5 - 
X4), THE RESULT IS TO BE PLACED IN X6,. 


WRITE AN INSTRUCTION THAT FORMS A MASK IN THE UP- 
PER 30-BITS OF THE XO REGISTER, 


et eS i 


163 


a 


12, 


15. 


14, 


1D; 


WRITE AN INSTRUCTION TO LOAD THE: X1 REGISTER-WITH 
A 60-BIT WORD LOCATED IN MEMORY, Al CONTAINS THE 
REQUIRED ADDRESS +2009, 


WRITE AN INSTRUCTION TO STORE THE VALUE IN X7 IN 
THE LOCATION IN MEMORY CALLED “SYMTAB” INDEXED BY 
NO B-REGISTER, 


WRITE AN INSTRUCTION TO LOAD FROM MEMORY THE X2 


REGISTER WITH THE 18-BIT ADDRESS IN X1 MODIFIED 


BY AN INDEX REGISTER B7. 


WRITE AN INSTRUCTION TO BUMP THE INDEX REGISTER 
B4 BY A VALUE OF 120g. 


WRITE AN INSTRUCTION TO SET THE INDEX REGISTER Bl 
TO THE VALUE IN AQ DECREMENTED BY THE VALUE IN B4, 


WRITE AN INSTRUCTION WHICH WILL COMPUTE THE DIFFER- 
ENCE OF Bl AND 82 AND PLACE THE RESULT IN XO, 


~ PROJECTS 


= 


PRopLem Set JA 


AVERAGE INTEGERS 


WRITE A PROGRAM TO FIND THE AVERAGE oF 10 INTEGERS, 


USE THE FOLLOWING FLOWCHART, 


’ SUMMATION 
OF 


INTEGERS 


COMPUTE 
AVERAGE 
= NOTE 


d 


SAVE | 
RESULTS 


ee 


NOTE: 


PROCEDURE: 


IF A AND B ARE INTEGER 
VALUES, THEN B/A = Q 
WITH A REMAINDER OF 
B - (Q=A), 


PACK AND NORMALIZE A AND B, 
COMPUTE B/A = Q, 


_UNPACK AND SHIFT Q; NOW Q 


IS INTEGER QUOTIENT, 

PACK AND NORMALIZE @ AND A, 
COMPUTE Q = A, 

UNPACK AND SHIFT THE PRO- 
DUCT AND SUBTRACT FROM B, 
THIS IS REMAINDER, 


PRoBLem 1B 


WRITE A PROGRAM TO soRT N INTEGERS INTO ASCENDING OR- 
DER. THE FOLLOWING IS A FLOW CHART TO ACCOMPLISH THIS 
USING THE SELECTION SORT METHOD, 


START 


| INITIALIZE | = 0 


J=1 
xl <——- 
VALUE +1 
xX? <— 
VALUE +J 


SWITCH 
~ XL_AN X2_ 
STORE X2IN 
' VALUE tJ 


YES 


STORE Xl IN 
VALUE +1 
I<—-It+ 
Je~Jt 


. 


Proprem 1C - . Square Root 


WRITE YOUR OWN SQUARE ROOT SUBROUTINE USING THE NEWTON 
ITERATION. os. 


Ad: | 
Yytl = 2 %y * vy) WITH YQ = ane + 2,0 


THE INPUT VALUE IS X WHILE THE RETURNED VALUE IS YOUR 
APPROXIMATION TO THE SQUARE ROOT OF X. OBTAIN A RELA- 
TIVE ACCURACY OF vee. 


Ts 
2 OF) ya QV gat 


| START 


GOT THE 
ANSWER! 


ProBLem Set 2 | 
CHARACTER DATA, DEFERRED SYMBOLS, SUBROUTINE. 


WRITE A SUBROUTINE TO CHECK IF THE FIRST CHARACTER OF 
A WORD IS A DOLLAR SIGN OR NOT, 


THE WORD TO CHECK CAN BE PLACED IN A X REGISTER, 


THE X REGISTER SOULD BE SET TO ZERO IF CHARACTER 1 Is 
A$, 
IF NOT, PUT A SHORT MESSAGE IN THE X REGISTER, 


THE MAIN PROGRAM SHOULD PLACE THE WORD TO BE CHECKED 
IN AN X REGISTER, CALL THE SUBROUTINE AND PLACE THE 
ERROR MESSAGE IN STORAGE WHEN CONTROL IS RETURNED, 


Use THE FOLLowING COMPASS FEATURES SOMEWHERE IN YouR 
PROGRAM: CHARACTER DATA, DEFERRED SYMBOLS (=s, =x) 
AND RETURN JUMP, 


Deck STRUCTURE 


CONTROL IDENT A 


; ENTRY A 
CARDS EXT 2 
"1s FIRST INSTRUCTION 
/ ' 
MAIN Ae B 
: PROGRAM . 
END =6A 
IDENT B 
SUBROUTINE ENTRY B 


NO TRANSFER 


FIRST INSTRUCTION 
ADDRESS 


END NO TRANSFER ADDRESS 


Propiem Set 3 3 COMMON STORAGE 
SET UP A BLANK COMMON BLOCK OF 12 LocaTIONs, 


SET UP A COMMON BLOCK LABELED TABLE wHICH CONTAINS 
DISPLAY CODE FOR THE NUMBER 0-7, 


List 12 OCTAL ONE-DIGIT INTEGERS IN YOUR MAIN PROGRAM, 
TRANSFER THE 12 NUMBERS TO BLANK COMMON, 
Go To A SUBROUTINE, 


IN THE SUBROUTINE, FETCH THE NUMBER FROM BLANK COMMON, 
LOOK UP THE DISPLAY CODE IN JABLE, 


STORE THE DISPLAY CODE BACK IN BLANK COMMON, 
RETURN TO THE MAIN PROGRAM AND STOP, 
FOR ADDED CHALLENGE, USE DISPLAY CODE FoR 0-7, 


List 12 DECIMAL INTEGERS (2 OR MORE DIGITS) AND FIND 
THE DISPLAY CODE, 


LABELED COMMON 
TABLE 


RA 


RA + 111 


MAIN PROGRAM 


SUBROUTINE 


CL Lig II Ie 


BLANK COMMON 


SUBROUTINE USES 
NUMBERS IN BLANK 
COMMON TO INDEX 
INTO A TABLE OF 
DISPLAY CODES, 


Proptem Set 4A MACRO 
WRITE THE FOLLOWING MACRO: 


PURPOSE: To COMPUTE N FACTORIAL EXACTLY (INTEGER), 
N = N(N-L)(nN-2)'''(2)(1) 


PARAMETERS: Pl=N 
P2 = RESULT REGISTER 
PROCEDURE: DEFINE N WITH A SET (1 <n<18) 


CALL THE MACRO, STORING THE RESULT AT THE 
SPECIFIED X REGISTER, 


Test Program: SET N 
CALL THE MACRO 
RESET N 
CALL THE MACRO AGAIN 
STORE THE RESULT 


STOP 


P-6 


Propiem Set 4B 


PURPOSE: 


PARAMETERS: 


PROCEDURE: 


WRITE A MACRO TO MOVE A MESSAGE FROM A 
USER BUFFER TO A COMMON BLOCK BUFFER, 


Pl = BEGINNING OF USER BUFFER, 
P2 = LENGTH OF USER BUFFER, 
P3 = BEGINNING OF BUFFER IN COMMON 


STORAGE, 
COMPUTE THE LENGTH OF THE BUFFER, 


CALL THE MACRO, 


REWRITE THE INTEGER MULTIPLY MACRO AS AN OPDEF, 


CALL IT, 


Propiem 5B 


WRITE AN OPDEF WHICH WILL COMPARE TWO CORE LOCATIONS 
FOR EQUALITY, 


OPDEF CALL: 
TAG CE Q. Qo. Qz 


WRITE A TEST PROGRAM WHICH CALLS THE MACRO, 


Proplem 6A 


| r PURPOSE: 

i PARAMETERS: 

| 

| 

| s PROCEDURE: 
B OPTIONAL 
COMPLICATION: 


P3 


| CONDITIONAL OPERATORS, MACROS 


WRITE THE FOLLOWING MACRO: 


CoUNT THE NUMBER OF BITS SET IN EACH 
WORD OF A TABLE, SAVE AND RESTORE ALL 
X REGISTERS IF REQUESTED, 


P] = LENGTH OF THE TABLE 
P2 = STARTING LOCATION OF THE TABLE 
= SAVE REGISTER FLAG 


S SAVE AND RESTORE ALL X REGISTERS 


‘BLANK UNNECESSARY TO SAVE REGISTERS 
CHeck P3, IF P3 = S SAVE THE REGISTERS, 


COUNT THE BITS IN THE TABLE WORDS, RE- 
TURNING THE COUNT TO THE TABLE, (LET 
THE TABLE BE LOCATED IN COMMON STORAGE 
IF YOU PREFER), 


RETURN THE REGISTERS IF NECESSARY AND 


RETURN TO THE USER, 


SAVE ALL REGISTERS ON REQUEST (NOT JUST 
THE X REGISTERS). THIS IS VERY DIFFI- 
CULT, 


P=9 


PROBLEM 6B - 


MACRO, CONDITIONAL (Micro USAGE OPTIONAL) 


WRITE THE FOLLOWING MACRO: 


PURPOSE: 


PARAMETER! 


‘PROCEDURE: 


Test Procram: 


OPTIONAL 
COMPLICATION: 


TO DOUBLE, SQUARE, OR HALVE A NUMBER, 
(FLOATING POINT) 


Pl = xX REGISTER CONTAINING THE NUMBER 
TO BE OPERATED ON, 
P2 = CoRE LOCATION WHERE RESULT IS TO 
BE PLACED, 
P3 = OPERATION FLAG 
P3 = 1 DouBLE CONTENTS OF Xx 
REGISTER 
P3 = S SQUARE CONTENTS OF x 
REGISTER 
P3 = H DIvIDE CONTENTS OF xX 


REGISTER BY 2, 
CHECK P3 USING CONDITIONALS, 


GENERATE THE APPROPRIATE RESULT AND 
STORE IT, 


THE TEST PROGRAM CAN BE VERY SIMPLE. 
SET UP A RESULT LOCATION, LOAD THE X 
REGISTER, CALL THE MACRO AND STOP, 


PERMIT P35 To Be D, S. Hs oR ANY COMBI- 


NATION, THE RESULTS CAN BE PLACED IN 
P2, P2 + 1 anp P2 + 2 IF NECESSARY, 
Xk, XK + 1 AND XK + 2 CAN CONTAIN OP- 


ERANDS. MICROS MUST BE USED TO CHECK 
P3. 


EVALUATION FORM 


Course/Seminar Name Date of Attendance From To 


we 


Instructor Location 


Please place a rating in the box fcr each area and then add comments explaining your rating. 


Rating Key 


Excellent 


Very Good 
Good 

Fair 

Poor 


mo RH 


The Course/Seminar 


* How well did the course/seminar cover the stated objectives? 


To what degree will the course/seminar be helpful in improving on-the-job 
performance? 


To what extent were the handout materials and visuals helpful in aiding your 
understanding of the topic? 


(10) OO 


What is your overall rating of the organization and content of the course/seminar? 


The Instructor 


* How do you rate the instructor’s knowledge of the material and ability to answer [| 


questions? 

How effective was the instructor in presenting the material in an understandable a 
manner? : 

* How effective was the instructor in generating and sustaining interest in- the [| 
course/seminar? 

* How do you rate the instructor’s responsiveness to the needs of participants? [J 

* What is your overall rating of the instructor? [] 


The Facilities 


* How do you rate the appropriateness of the facilities to the topic and means of CJ 


presentation? 


To what extent were the facilities comfortable, well-lighted and heated or cooled? [| 


How convenient was the location of the facility? [| 


* 


3) 


* 


* 


Address 
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Page 2 
Generali Comments 


What changes in the course/seminar would you make if you were the instructor? 


Would you recommend this course/seminar to others in your company or 


department? Why? 


Please list colleagues or associates who should receive advance notices of similar 


courses/seminars. 


Organization 
ACHES 5 on 
L—————————L SS 


Bus. Tel. No. 


Name a 3 


Organization — 
——$——$ 
ce 


rat 


Bus. Tel. No. 


Should this course be offered at your company site? 


to manage it? 


2) 


4) 


1 i 1) ee ee ee eS 


Organization — 


Address 


Organization —W 
GATS fase oe 
ee ee 


Bus. Tel. No. 


Leen 


If so, who should be contacted 


If we may use your comments in future descriptions of the course/seminar. please 


sign below. 


Signature 
eee 


(Optional) 


PARTICIPANT INFORMATION FORM 


° 


In order for our seminars/courses to be most effective, they need to take into account the 
characteristics, needs and objectives of the people who attend them. The information asked 
for below will assist us in. keeping our presentations relevant to the participants and in devel- 
oping and scheduling new presentations that will meet participant needs. Please complete this . 
form and leave it with the presenter at the next break. 


. Seminar/Course Title eee ee ee ee ae ee Date of Presentation 
Name Ss Field or Type of Business 
Title os Years of Experience 
Business Address __ | : Supervisor’s Title 


Last professional degree 


List your three primary objectives in attending this seminar. 


Will this course/seminar be credited toward certification/training requirements? 


Rank in order of importance in your choice of this seminar session. 


Instructor Date ___ Location ___#s=_—Ss—« Employer’s Preference 


Previous courses/seminars attended relating to this topic. 


Topics for additional courses/seminars in which you would be interested. 


PARTICIPANT INFORMATION FORM 
Page 2 


What trade journals/magazines do you regularly read or subscribe to in order to keep abreast 
in your profession? 


How did you become aware of this course/seminar? 


Schedule/Catalogue —________ 
Direct Mail Brochure 
Recommendations of Supervisor 
Recommendation of Colleague 
Corporate Training Deparent 


Other 
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